如何分离图形，然后在一个图形窗口上绘制它们？

Question

我有三个时间序列md1、md2、md3，三个 ARIMA 模型f1、f2、f3。我想在一个图形窗口中绘制 ARIMA 模型的 AR- 和 МA-根。我试过了：

library(forecast)

md1 <- runif(100, 0, 1)
md2 <- runif(100, 0, 1)
md3 <- runif(100, 0, 1)

f1<-arima(md1,order=c(1,1,0))
f2<-arima(md2,order=c(1,1,0))
f3<-arima(md3,order=c(2,1,2))

par(mfrow = c(1,3))
#  AR- и МA-roots of ARIMA models
plot(f1) # one graph
plot(f2) # one graph
plot(f3) # two graphs

结果，我只看到最后一个图，即plot(f3)。当然，我可以添加windows()命令

plot(f2); windows()

为plot(f3) 创建一个新的图形窗口。另外，我尝试更改 par() 函数的选项，喜欢

par(mfrow = c(2,2))

并尝试创建一个新对象

 p3 <- plot(f3)

但没有达到预期的效果。

问题。 plot(f3)命令生成的两张图如何分开？

预期结果：

Answer 1

我找到了我的问题here 的答案。这是作者未包含在包forecast 中的代码。