R:如何绘制多个类别的箱线图

Question

我有一个像这样的 data.frame:

date <- as.POSIXct(c("2015-08-14 08:04:50", "2015-08-14 08:06:50", "2015-08-14 08:015:50", "2015-08-15 08:17:50", "2015-08-15 08:23:50")
transport <- c("bus", "bus", "train", "train", "train")
no2 <- c(74, 78, 100, 90, 85)
df <- data.frame(date, transport, no2, stringsAsFactors = FALSE))

我想根据运输方式和不同的日子制作一个箱线图。所以基本上我希望它分为两类:按天和按运输方式。据我所知，在boxplot函数中定义了x和y，所以可以根据x绘制y。

有人知道如何使用两个类别吗？

另一个关于箱线图的类似问题:我有这样的数据:

date <- as.POSIXct(c("2015-08-14 08:04:50", "2015-08-14 08:06:50", "2015-08-14 08:015:50", "2015-08-15 08:17:50", "2015-08-15 08:23:50"))
no2_site1 <- c(74, 78, 100, 90, 85)
no2_site2 <- c(84, 88, 110, 100, 95)
df <- data.frame(date, no2_site1, no2_site2, stringsAsFactors = FALSE)

我的目标是制作一个箱线图，显示不同日期两个地点(每天 2 个箱子)的 NO2 浓度。

Answer 1

由于您的日期包括时间，因此需要删除时间以便您拥有离散的日期。然后，编写一个 R 公式(y ~ x * x2 ... 表示法)来描述 no2 值取决于 date 和运输。

df$date = strftime(df$date, "%Y-%m-%d")
df$date = factor(df$date)
boxplot(no2 ~ date * transport, data = df, col=(c("gold","darkgreen")))

这是ggplot

的代码

library(ggplot2)
ggplot(df, aes(x=date, y=no2)) + geom_boxplot(aes(fill=date))+ facet_grid(~ transport, scales='free_x')