迭代一系列情节

Question

我希望能够迭代一系列类似于plot.lm()

的情节的图表。

到目前为止我有这个，但它没有更新情节，只显示初始值。

任何想法如何按预期工作？

iterateResults <- function(x)
{
    oask <- devAskNewPage(TRUE)
    on.exit(devAskNewPage(oask))
    for (i in 1:length(x))
    {
        plot(x[1]:x[i])
    }
}

Answer 1

此外，还有好的par(ask = TRUE)

Answer 2

图表功能之间的暂停对我有用。你的意思是让密钥命令改为plot(x[seq(i)])吗？否则它只是绘制索引。

请注意，一般seq(length(x))优先于1:length(x)，因为如果length（x）== 0，则使用冒号运算符时遇到问题。 seq_along(x)更简单。