Я хотел бы создать Gif с данными XY, добавляя новую точку каждый раз на моем графике. Я хотел бы видеть последовательность моих данных в Gif. В первом кадре должна быть показана точка, во вторых двух точках и в последнем кадре все точки.
Для этого я пытался сохранить в формате Gif a 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)
Любой способ решения этой проблемы будет приветствоваться.