Question

我最终尝试使用for循环创建包含多个绘图的PDF。当我单独运行图表时，我收到一条警告信息，但是图表生成了。但是，当我在for循环中运行绘图时，绘图不会生成。我认为这是因为for循环在第一条警告消息出现后停止。

这是一个单数图的代码，它有一条警告信息，但会产生一个情节：

ggplot(raw[raw$Sector==sectorname,],aes(x=SEP_Score)) + 
  geom_histogram() + 
  facet_grid(~LabelYear_AUTO) + 
  stat_bin(breaks=rng) + 
  scale_y_continuous(name = "Count")

当我运行此代码时，会生成一个图，但我收到以下警告：

`stat_bin()` using `bins = 30`. Pick better value with `binwidth`.

同样，我对binwidth很好。我不想改变任何事情。

现在，当我稍微修改代码时，多个绘图将不生成我的查看器中显示的绘图。这是我使用的代码。

for (i in 1:nrow(table(raw$Sector))){

 sectorname=rownames(table(raw$Sector))[i]

 ggplot(raw[raw$Sector==sectorname,],aes(x=SEP_Score)) + 
   geom_histogram() + 
   facet_grid(~LabelYear_AUTO) + 
   stat_bin(breaks=rng) + 
   scale_y_continuous(name = "Count"))
}

如何告诉R忽略所有警告消息并运行我想要的任务？

我已经尝试了以下代码，将try包裹在有问题的文字周围无济于事。

for (i in 1:nrow(table(raw$Sector))){

 sectorname=rownames(table(raw$Sector))[i]
  try(ggplot(raw[raw$Sector==sectorname,],aes(x=SEP_Score)) + 
        geom_histogram() +
        facet_grid(~LabelYear_AUTO) +   
        stat_bin(breaks=rng) + 
        scale_y_continuous(name = "Count")
      )
    }

警告消息阻止循环完成和绘图生成

0 个答案: