R语言gganimate动态图

library(gapminder)
library(dplyr)
library(gganimate)
gapminder %>% 
  ggplot(aes(x = gdpPercap, y = lifeExp, size = pop, color = continent)) + 
  geom_point() + 
  scale_x_log10() + 
  transition_manual(frames = year) + 
  ggdark::dark_theme_bw() + #设置黑色主题
  labs(title = paste('Year:', '{current_frame}'))#设置标题跟随当前的年份变化,即current_frame。

R语言gganimate动态图_第1张图片
gganimate的transition_*函数有很多个,就测试而言,transition_manual()的运行速度最快,transition_time()的速度很慢,容易把电脑跑死。
R语言gganimate动态图_第2张图片

你可能感兴趣的:(R语言gganimate动态图)