删除未使用的分类值箱线图 - R [重复]

Question

我有以下代码：

x = rnorm(30, 1, 1)
c = c(rep("x1",10), rep("x2",10), rep("x3",10))
df = dataframe(x,c)
boxplot(x ~ c, data=df)

效果很好。但是，如果我决定不再对查看 x3 感兴趣，请将其删除并重新绘制：

dfMod = subset(df, c %in% c("x1", "x2"))
boxplot(x ~ c,data=dfMod)

箱线图仍然显示 x3 的列。

我试过给箱线图一个提示

boxplot(x~c,data=dfMod, names = c("x1", "x2"))

但这会引发名称大小不正确的错误。提前感谢您的帮助

Answer 1

在subset 之后使用droplevels

dfMod <- subset(df, c %in% c("x1", "x2"))    
dfMod$c <- droplevels(dfMod$c)
boxplot(x ~ c,data=dfMod)

您还可以使用class 将factor 更改为character 并在boxplot 调用中设置子集

class(df) <- c("numeric", "character")
boxplot(x ~ c, subset=c %in% c("x1", "x2"),  data=df)