Plot R中的几张图

Question

我正在尝试 plot 自动使用 ggplot 绘制几张图。 我想制作总共 23 个堆叠条 plot。

原始 df ( train2016 ) 在第 25 至 48 列中有变量，所有变量都具有值c(0, 1) 。

我想在 Y 轴上表示月份（在列中给出）- X 轴是每个变量的 0 或 1 值的计数结果。

我看不到结果，也没有错误显示。 这是我写的代码。 我知道一定有多个错误

par(nfrow=c(4,6))
for (i in 25:48) {
  datos22 <- train2016 %>%
    group_by(month, train2016[i]) %>%
    summarise(count= n()) %>% 
    ggplot(aes(fill=train2016[i], x=count,y=month)) +
    geom_col() +
    ggtitle(" ") 
}

Answer 1

您可以尝试ggsave保存图表

par(nfrow=c(4,6))

for (i in 25:48) {
  datos22 <- train2016 %>%
    group_by(month, train2016[i]) %>%
    summarise(count= n()) %>% 
    ggplot(aes(fill=train2016[i], x=count,y=month)) +
    geom_col() +
    ggtitle(" ") 
  ggsave(paste0("plot_", i, ".png")) 
}

将所有绘图保存到独立文件中。