Question

我正在尝试在R中的动画包中使用saveGIF函数。plot没问题，但是ggplot出现错误

如下图所示，玩具绘图功能可用于绘图，但ggplot会引发错误

simplePlot <- function (){

df <- data.frame(dose=c("D0.5", "D1", "D2"),
                            len=c(4.2, 10, 29.5))
p<-ggplot(data=df, aes(x=dose, y=len)) +
  geom_bar(stat="identity")
p

df <- data.frame(dose=c("D0.5", "D1", "D2"),
                 len=c(5.2, 5, 19.5))
p<-ggplot(data=df, aes(x=dose, y=len)) +
  geom_bar(stat="identity")
p

}

simplerPlot <- function(){
  df <- data.frame(dose=c("D0.5", "D1", "D2"),
                   len=c(4.2, 10, 29.5))
  plot(df)
  df <- data.frame(dose=c("D0.5", "D1", "D2"),
                   len=c(5.2, 5, 19.5))
  plot(df)

}

--->有效

saveGIF(simplerPlot(),movie.name = 'test.gif')

--->引发错误

saveGIF(simplePlot(),movie.name = 'test.gif')

这是saveGIF（simplePlot（），movie.name ='test.gif'）引发的错误

Error in if (100%%fps) stop("argument 'fps' must be a factor of 100") : 
  argument is of length zero

使用saveGIF（simplerPlot（），movie.name ='test.gif'）不会发生

R Works中的saveGIF似乎适用于绘图，但不适用于ggplot

0 个答案: