在 gganimate 中没有获得所需的标题 - 带有表情的动画标签

Question

我想m^2 m^-2使用gganimate. 例如，当我只使用它时，下面给了我我想要的输出ggplot2：

library(ggplot2)
ggplot(mtcars, aes(wt, mpg)) + 
        geom_point() +
        labs(title = "Hp" ~ m^2 ~ m^-2)

但是，当我执行以下操作时，gganimate我没有得到 Hp 的变化值，但是{closest_state}

library(gganimate)
ggplot(mtcars, aes(wt, mpg)) + 
        geom_point() + 
        transition_states(hp) +
        labs(title = expression('Hp = {closest_state}' ~ m^2 ~ m^-2))

我怎么能解决这个问题？

Answer 1

您可以使用ggtextwhich 允许有限的Markdownformat子集。
这对于您的示例中的指数和指数来说已经足够了，但不幸的是Latex 数学尚不可用。

library(ggtext)
library(gganimate)

ggplot(mtcars, aes(wt, mpg)) + 
  geom_point() + 
  transition_states(hp) +
  labs(title = "Hp : {closest_state} m^2  m^-2")+
  theme(plot.title = element_markdown())