如何一次绘制数据集R中特定列的多个直方图答案

【问题标题】：How to plot multiple histograms at once of specific columns within dataset R如何一次绘制数据集R中特定列的多个直方图
【发布时间】：2020-12-15 22:30:38
【问题描述】：

我正在使用 R 数据集“USarrests”并尝试绘制每列的直方图。但是，当我这样做时，我无法弄清楚如何放置 xaxis 标签以及每个直方图的标题，以标记我正在查看的变量。

我现在有

attach(USArrests)
lapply(arrests[,c(1:4)], FUN = hist)

输出的四个直方图如下所示：

如何添加轴/标题标签？谢谢

【问题讨论】：

你必须使用base R hist吗？这可以使用ggplot 和构面来完成。无关：不鼓励使用attach。
仅供参考：彻底回答问题非常耗时。如果您的问题已解决，请通过接受最适合您的需求的解决方案表示感谢。✔ 位于答案左上角的向上/向下箭头下方。如果出现更好的解决方案，则可以接受新的解决方案。如果您的声誉超过 15 岁，您还可以使用向上或向下箭头对答案的质量/有用性进行投票。 如果解决方案无法回答问题，请发表评论。 What should I do when someone answers my question?。谢谢。

标签： r dataframe histogram lapply

【解决方案1】：

如果你想使用base R，这是一个for循环比lapply更好的场合。

par(mfrow = c(2, 2))
for(i in names(USArrests))
  hist(USArrests[[i]], main = i, xlab = "Value")

您也可以将tidyr 和ggplot2 与构面一起使用，但需要对直方图箱大小进行试验。

library(tidyr)
library(ggplot2)

USArrests %>% 
  pivot_longer(cols = 1:4) %>% 
  ggplot(aes(value)) + 
  geom_histogram() + 
  facet_wrap(~name, scales = "free")

【讨论】：