我想将使用gganimate包制作的动画并排显示，或者至少在同一文档中显示。
要处理的图表：
第一次尝试：
第二次尝试：
这实际上可以渲染而不会出错，但结果只是最后一个“gganim_built”对象（这里是anime_two）的动画。
第三次尝试（有效，但并非我要寻找的解决方案） 我找到的唯一半路解决方案是将所有内容包含在Rmarkdown文档中，然后使用动画调用制作编解码块（每个编解码块只有一个动画调用，否则它无法工作），最后将文档编织到HTML。
有人成功地让gganimate对象并排显示吗？
提前感谢。
要处理的图表：
library(ggplot2)
library(gganimate)
anime_one <-
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')
anime_two <-
ggplot(mtcars, aes(factor(cyl), mpg, fill = factor(cyl))) +
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')
第一次尝试：
library(patchwork)
anime_one + anime_two
Error in UseMethod("ggplot_gtable") :
no applicable method for 'ggplot_gtable' applied to an object of class
"gganim_built"
第二次尝试：
library(patchwork)
animate(anime_one+anime_two)
这实际上可以渲染而不会出错，但结果只是最后一个“gganim_built”对象（这里是anime_two）的动画。
第三次尝试（有效，但并非我要寻找的解决方案） 我找到的唯一半路解决方案是将所有内容包含在Rmarkdown文档中，然后使用动画调用制作编解码块（每个编解码块只有一个动画调用，否则它无法工作），最后将文档编织到HTML。
```{r}
animate(anime_one)
```
```{r}
animate(anime_two)
```
有人成功地让gganimate对象并排显示吗？
提前感谢。