如何在同一轴上绘制到两个单独的箱形图？

Question

我目前对“ pollutionData.csv”数据有两个单独的箱线图。当雨= 0时中午12点一个用于PM2.5，当雨> 0时另一个中午12用于PM2.5。

我使用的代码是：

dat$constant <- 0
boxplot(PM2.5~CONSTANT, data=subset(dat, RAIN == 0 & hour == 12))
boxplot(PM2.5~CONSTANT, data=subset(dat, RAIN > 0 & hour == 12))

我的问题：如何使这两个箱形图显示在同一轴上。

任何帮助都会得到感谢！

谢谢

Answer 1

您不需要dat $ CONSTANT

dat = data.frame(RAIN=sample(0:1,200,replace=TRUE),
hour = sample(1:12,200,replace=TRUE),
PM2.5=runif(200))

boxplot(PM2.5~ RAIN > 0,data=subset(dat,hour == 12),names=c("RAIN==0","RAIN>0"),xlab="")

如果RAIN的值不是0/1，请执行：

dat = data.frame(RAIN=sample(0:5,200,replace=TRUE),
    hour = sample(1:12,200,replace=TRUE),
    PM2.5=runif(200))

sub_dat = list(
"RAIN==0"=subset(dat, RAIN == 0 & hour == 12)$PM2.5,
"RAIN>0"=subset(dat, RAIN > 0 & hour == 12)$PM2.5
)
boxplot(sub_dat)