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

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 <- 0，这只适用于1个boxplot。波浪号(~)用于指定分隔。例如，如果雨量值为0/1，则可以执行以下操作：

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="")

​

​

如果雨的值不是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)