R中的实时自动递增ggplot

Question

This thread 回答如何在 R 中创建具有实时效果的增量图。

我想用ggplot2而不是R的基础plot做同样的事情。直接从该链接中的答案复制，我尝试了这个，但它没有用：

n=1000
df=data.frame(time=1:n,y=runif(n))
window=100
for(i in 1:(n-window)) {
  print(i)
  flush.console()
  ggplot(df) + geom_line(aes(x=time, y=y), size=0.7) + xlim(i,i+window)
  Sys.sleep(.09)
}

我猜ggplot2 的图像渲染效果不同。是否可以用ggplot2创建实时更新效果？

理想情况下，我希望能够显示多个geom_lines。但我猜逻辑是一样的。

另外，当情节在 R-Studio 中“放大”时，是否有可能实现这一点？

Answer 1

目前尚不清楚您将如何处理，但此代码将生成一个流畅呈现的 HTML 动画。不过创建动画需要一段时间（大约一分钟）。

library(animation)
library(ggplot2)
# your data
n  <- 1000
df <- data.frame(time=1:n,y=runif(n))
window <- 100
# create the animation
saveHTML({
for(i in 1:(n-window)) {
  print(ggplot(df) + geom_line(aes(x=time, y=y), size=0.7) + xlim(i,i+window))
}
})