bwplot上的箱图从格的R-变化

Question

我的任务是将使用图形包的代码从lattice包更改为带有bwplot的东西，结果相同。

Boxplot：

par(mai = c(1, 1, 1, 1), omi = c(0, 0, 0, 0))
set.seed(591)
xx1 <- rnorm(20, mean = 3, sd = 3.6)
xx2 <- rpois(40, lambda = 3.5)
xx3 <- rchisq(31, df = 5, ncp = 0)
box1 <- boxplot(xx1, xx2, xx3, names = c("Group-1", "Group-2", "Group-3"), cex = 0.7)

不幸的是，当我试图改变它时，我不能在一个图表中插入这3个图。到目前为止，我所做的一切：

library(lattice)
bwplot(xx1,ylab="Group-1")
bwplot(xx2,ylab="Group-2")
bwplot(xx3,ylab="Group-3")

Answer 1

您可以使用以下代码通过lattice包完成此操作

library(dplyr)
df1 <- data.frame(xx1, levels ="Group-1")
df2 <- data.frame(xx2, levels ="Group-2")
df3 <- data.frame(xx3, levels ="Group-3")
colnames(df1) <- c("Data","Group")
colnames(df2) <- c("Data","Group")
colnames(df3) <- c("Data","Group")

df <- bind_rows(df1,df2,df3)

bwplot(Data~Group,df)

​

​