全屏查看时,ggplot2 + gganimate像素化文本标签

时间:2019-01-16 16:19:56

标签: r ggplot2 gganimate

我使用gganimate使用ggplot2渲染一些gif。

我的主要问题是,显示器的最佳性能迫使我们渲染小gif图像,然后使用浏览器中的CSS将其放大到全屏。没有其他可用的选项。较大的gif会造成口吃。

enter image description here

是否有任何方法可以创建任何格式或选项的绘图,以防止在放大时像素像素化字体?

尝试使用以下示例代码:

    airq <- airquality
airq$Month <- format(ISOdate(2004,1:12,1),"%B")[airq$Month]

plot <- ggplot(airq, aes(Day, Temp, group = Month)) + 
  geom_line() + 
  geom_segment(aes(xend = 31, yend = Temp), linetype = 2, colour = 'grey') + 
  geom_point(size = 2) + 
  geom_text(aes(x = 31.1, label = Month), hjust = 0) + 
  transition_reveal(Day) + 
  coord_cartesian(clip = 'off') + 
  labs(title = 'Temperature in New York', y = 'Temperature (°F)') + 
  theme_minimal() + 
  theme(plot.margin = margin(5.5, 40, 5.5, 5.5))

options(gganimate.dev_args = list(width = 4, height = 2, units = 'in', res = 90))

animate(plot, renderer = gifski_renderer(loop = F))

也许可以使用svg设备选项来进行基于svg的gif动画制作,但是...这会以可缩放的gif文件结尾而不变形吗?

还有其他选择吗?

0 个答案:

没有答案