多个预言图在 for 循环中保存为 jpeg (R)

Multiple prophet plots saved to jpeg in for loop (R)

我正在尝试在 for 循环中创建并保存来自 fb prophet 的多个图,并将它们保存为 jpeg 文件。

尽管在 Whosebug 上遵循与在循环中保存 R 图相关的许多问题的代码,none 的解决方案似乎有效,但我无法弄清楚我做错了什么。下面的代码将在 for 循环中:

  jpeg(filename="plot1.jpeg")
  plot(model, future_forecast) + ggtitle(Material_name)
  dev.off()

  #now plot seasonalities
  jpeg(filename="plot2.jpeg")
  prophet_plot_components(model, future_forecast) 
  dev.off()


我希望这段代码会使用先知绘图功能创建两个单独的图,并将它们保存到 jpeg 文件中。实际发生的是程序正确保存了一个绘图文件,并将第二个绘图文件保存为空白绘图。

与 运行 不同的是,当您逐行执行(或获取)脚本时,某些输出会被抑制。这就是这里发生的事情。为了强制输出您的绘图,只需将语句包含在 print 函数中。
例如:

print(prophet_plot_components(model, future_forecast))