r - 在 r 中使用 par() 函数时如何将列名添加到直方图中

Question

我想在我的数据框中绘制所有直方图。我尝试的一种方法是 hist.data.frame(df) ，它给了我非常小的图片。然后我尝试了这段代码：

library(datasets)
data(iris)
X<-iris[,0:3]
par(mfrow=c(2,1))
histout=apply(X,2,hist)

这一次，每张图片都足够大，但它们都有一个像 Histogram NewX[,i] 这样的标题。当我有这么多变量时，这很不清楚。无论如何我可以为每个图表添加列名吗？谢谢！

Answer 1

我建议您使用lapply并向其中的hist函数提供额外的参数（main,xlab等）。您也可以使用循环。

例如，

library(datasets)
data(iris)
X<-iris[,0:3]
par(mfrow=c(3,1))
lapply(names(X), function(k) hist(X[[k]], main=k))

编辑：对不起，这与评论中给出的答案基本相同。我没见过。