列表的箱线图子列表

Question

我是 R 的新手。我正在尝试使用 lapply 在每个子列表中绘制数据（df，列表）。我写了这个函数：

group.box <- function(x) {
   lapply(X = x, FUN = boxplot)
}

运行它在包含 6 个子列表的列表上给了我 6 个单独的箱线图（6 个分开的图）和这个文本：

$sublist1
NULL

$sublist2
NULL

$sublist3
NULL

...

我尝试将这些图组合成一张有 6 个图的图片：

par(mfrow=c(2,3))
group.box(data)
dev.off()

但后来我只得到没有图表的文本（如上所示）。我想也许我应该将这 6 张图表导出到一个 pdf 文件中。

谢谢！

Answer 1

你可以试试

data <- data.frame(a = rnorm(100), b = rnorm(100), c = rnorm(100), d = rnorm(100), e = rnorm(100), f = rnorm(100))

group.box <- function(x, plot_row, plot_col) {
    quartz()
    par(mfrow=c(plot_row,plot_col))
    lapply(X = x, FUN = boxplot)
}

group.box(data, 2,3)

你当然可以使用png(...)或pdf(...)等代替quartz()

列表的箱线图子列表

Boxplot sublists of a list

r

boxplot

sublist