如何在R中将for循环保存为Gif文件？

Question

我想创建一个带有XY数据的Gif，每次在我的情节中添加一个新点。我想在Gif中看到我的数据的累积序列。在第一帧中，绘图应该显示一个点，在后两个点中，在最后一帧中显示所有点。

为此，我试图将Gif保存为for-loop，但我有两个问题无法解决。首先，Gif仅使用所有点保存最后一帧或图像。其次，当我使用par(new=TRUE)时，礼物会被保存，但每帧只有一个点 我试图在情节中设置透明的背景颜色，但这是不可能的。

以下是一个例子：

x  <- 1:10
set.seed(1)
y <- rnorm(10)
graphics.off()     

library(animation)
ani.options(convert = 'C:/PROGRA~1/ImageMagick-7.0.7-Q16/magick.exe') # update the folder name to your software version.
saveGIF({

  for (i in 1:10) {
    plot(x[i], y[i], pch=1, type="b", col="red", xlim = c(1,10), ylim = c(-1, 2))
    Sys.sleep(0.5) 
    par(new=TRUE)
  }
}, movie.name = "test.gif", ani.width = 1000, ani.height = 500, nmax = 50, interval =0.5)

欢迎以任何方式解决此问题。