如何在 R 中以最少的努力为数据集中的所有变量创建直方图？

探索新的数据集：可视化许多（所有）变量的最简单、最快的方法是什么？

理想情况下，输出显示彼此相邻的直方图，具有最小的混乱和最多的信息。这个问题的关键是处理大型和不同数据集的灵活性和稳定性。我使用 RStudio，通常处理大量且混乱的调查数据。

开箱即用的一个例子Hmisc在这里效果很好的是：

library(ggplot2)
str(mpg)

library(Hmisc)
hist.data.frame(mpg)

不幸的是，在其他地方我遇到了数据标签的问题（plot.new() 中的错误：图形边距太大）。对于比以下数据集更大的数据集，它也会崩溃mpg我还没有弄清楚如何控制分箱。此外，我更喜欢灵活的解决方案ggplot2。请注意，我刚刚开始学习 R，并且习惯了商业软件提供的舒适解决方案。

有关此主题的更多问题：

R 直方图 - 变量太多

...?

可能有三种广泛的方法：

1. 来自包的命令，例如hist.data.frame()
2. 循环变量或类似的宏结构
3. 堆叠变量和使用构面

Packages

其他可能有用的命令：

library(plyr)
library(psych)
multi.hist(mpg) #error, not numeric
multi.hist(mpg[,sapply(mpg, is.numeric)])

也许multhist from plotrix，我还没有探索过。它们都没有提供我所寻求的灵活性。

Loops

作为 R 初学者，每个人都建议我远离循环。所以我这样做了，但也许这里值得一试。任何建议都非常受欢迎。也许您可以评论如何将图表合并到一个文件中。

Stacking

我的第一个怀疑是堆叠变量可能会失控。然而，对于一组合理的变量来说，这可能是最佳策略。

我想出的一个例子使用melt功能。

library(reshape2)
mpgid <- mutate(mpg, id=as.numeric(rownames(mpg)))
mpgstack <- melt(mpgid, id="id")
pp <- qplot(value, data=mpgstack) + facet_wrap(~variable, scales="free")
# pp + stat_bin(geom="text", aes(label=..count.., vjust=-1))
ggsave("mpg-histograms.pdf", pp, scale=2)

（如您所见，我尝试在条形上放置值标签以提高信息密度，但效果不太好。x 轴上的标签也不太理想。）

这里没有完美的解决方案，也不存在放之四海而皆准的命令。但也许我们可以更轻松地探索新的数据集。