是否可以通過方差對 R 中的箱形圖進行排序？
rm(list = ls())
library(datasets)
library(ggplot2)
data(airquality)
airquality$Month <- factor(airquality$Month,
labels = c("May", "Jun", "Jul", "Aug", "Sep"))
p10 <- ggplot(airquality, aes(x = Month, y = Ozone))
geom_boxplot()
p10
我怎樣才能使變化最大的變數位于該圖的左側？
任何幫助將不勝感激！
uj5u.com熱心網友回復：
你reorder可以這樣做：
library(ggplot2)
data(airquality)
airquality$Month <- factor(airquality$Month,
labels = c("May", "Jun", "Jul", "Aug", "Sep"))
ggplot(airquality, aes(x = reorder(Month, Ozone, function(x) -var(x, na.rm = TRUE)), y = Ozone))
geom_boxplot()
#> Warning: Removed 37 rows containing non-finite values (stat_boxplot).
uj5u.com熱心網友回復：
這是一個完整的基于 tidyverse 的代表
library(tidyverse)
airquality %>%
group_by(Month) %>%
mutate(var = var(Ozone, na.rm = TRUE)) %>%
ungroup() %>%
mutate(Month = fct_reorder(month.abb[Month], -var)) %>%
ggplot(aes(x = Month, y = Ozone))
geom_boxplot()
#> Warning: Removed 37 rows containing non-finite values (stat_boxplot).
由reprex 包（v2.0.1）于 2022-04-18 創建
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/462753.html
上一篇：餅圖中的百分比而不是計數