包gganimate
创建gif(来自here的MWE代码):
library(ggplot2)
#devtools::install_github('thomasp85/gganimate')
library(gganimate)
p <- ggplot(mtcars, aes(factor(cyl), mpg)) +
geom_boxplot() +
# Here comes the gganimate code
transition_states(
gear,
transition_length = 2,
state_length = 1
) +
enter_fade() +
exit_shrink() +
ease_aes('sine-in-out')
现在如何导出此gif?在
gganimate
的先前版本(现已归档)中,这很简单: gganimate(p, "output.gif")
但是,我在当前的
gganimate
包中找不到等效功能。注意:这个问题似乎与我从中获取MWE代码的问题完全相同。但是,
gganimate
已更新,并且在新版本中,在查看器窗格中显示动画与导出动画似乎是不同的问题。 最佳答案
您可以这样:
anim <- animate(p)
magick::image_write(anim, path="myanimation.gif")
关于r - 使用gganimate导出gif,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/51440496/