如何使用 NA 递归绘制空的 bloxplot

Question

我正在尝试递归箱线图，但数据集中的一列是 NA 并且 return：boxplot.default(split(mf[[response]], mf [-响应]), ...)

如何为该列绘制空箱线图？

示例：

x1<-rnorm(40,4) #complete
x2<-c(rnorm(10,1),rep(NA,10),rnorm(20,2)) #incomplete
x3<-c(rep(NA,40)) #only NA
x4<-rnorm(40,4) #complete
clas<-c(rep(1,10),rep(2,10),rep(3,10),rep(4,10))
dat<-cbind(x1,x2,x3,x4,clas)
dat

for(i in 1:4){
boxplot(dat[,i]~factor(clas))
x11()
}

我真的卡在这里了

Answer 1

R 不知道用于 y 轴的最小值和最大值。但是你可以生成一个假的 y 向量，只需设置 border="white" 使其不可见。

x1<-rnorm(40,4) #complete
x2<-c(rnorm(10,1),rep(NA,10),rnorm(20,2)) #incomplete
x3<-c(rep(NA,40)) #only NA
x4<-rnorm(40,4) #complete
clas<-c(rep(1,10),rep(2,10),rep(3,10),rep(4,10))
dat<-cbind(x1,x2,x3,x4,clas)
dat

for(i in 1:4){
  if(all(is.na(dat[,i]))) {
    #set y axis min and max
    y.min <- 1
    y.max <- 5
    y.vec <- c(rep(y.min, nrow(dat)- 1), y.max)
    boxplot(y.vec~factor(clas), border = "white")
  } else boxplot(dat[,i]~factor(clas))
  x11()
}

如何使用 NA 递归绘制空的 bloxplot

How draw a empty bloxplot recursive with NAs

r

boxplot

na