我正在尝试通过大型数据集（通过循环科学实验）在R中制作动画图，以可视化两个变量随时间的变化。我animation只是简单地使用该库：
saveGIF(
for(i in 1:100){
mygraph(i)
}, interval = 0.1, ani.width = 640, ani.height = 480)
在这里mygraph(i)仅绘制周期i的图形。如果我plot()用来制作图形，那么它工作得很好，但是如果我改用ggplot（我想这样做，因为我最终想用它来制作更复杂的图），那么它就不起作用了，我得到了以下输出：
Executing:
'convert' -loop 0 -delay 'animation.gif'
convert: InvalidArgument `-delay': animation.gif @ error/convert.c/ConvertImageCommand/1161.
an error occurred in the conversion... see Notes in ?im.convert
[1] FALSE
我是R的新手，所以我有些困惑，而且我还没有从观察?im.convert或四处寻找解决方案。任何建议将不胜感激...
根据要求提供虚拟数据的示例：
library(animation)
library(ggplot2)
x <- 1:20
y <- 21:40
z <- c(1,1,1,1,1,2,2,2,2,2,3,3,3,3,3,4,4,4,4,4)
data <- data.frame(x,y,z)
mygraph <- function(i) {
plot(data$x[data$z == i],
data$y[data$z == i],
title(title))
}
saveGIF(
for(i in 1:4){
title <- paste("Cycle", i, sep=" ")
mygraph(i)
}, interval = 0.5, ani.width = 640, ani.height = 480)
这可以，但是如果函数mygraph是：
mygraph <- function(i) {
ggplot() +
geom_point(aes(x=data$x[data$z == i], y=data$x[data$z == i]))
}
...然后它给了我如上所述的错误。
如果包裹ggplot了一条print()语句，这似乎可以工作，例如
mygraph <- function(i) {
g <- ggplot() +
geom_point(aes(x=data$x[data$z == i], y=data$x[data$z == i]))
print(g)
}
这是R-FAQ 7.22的变体，为什么晶格/格子图形不起作用？
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句