用新数据连续更新ggplot太慢了

Question

我想绘制一些我不断计算的值。我准备了一个小代码示例来解释这个问题。每次，我创建一个新值，我想将其插入我的情节并更新图表。

library('ggplot2')

x <- seq(1,20)
y <- rnorm(20)

g <- qplot(x, y)

for(i in 1:50){
    y <- c(y[2:20], rnorm(1))
    print(g)
}

所以这个例子有效，但它闪烁得非常惊人，每次创建一个新图表时，它都会被清除（白色屏幕），经过一段时间后，只会出现一小段时间，图表就会出现。

如果我只使用标准plot(x,y)它完美无缺，但我想应用ggplot。或者我是否必须更改X11（）的参数或者可能有更快的设备，或者ggplot可能有某种更新功能（仅更新点数）？