将全局变量(这里是'var')放入ggketusfor循环中的g标题中的粗体字符串中。

Question

参考资料：How to use bold, italic and underline in ggplot2

嗨，我想要把全局变量(这里是'var')放在gggketusfor循环中的中。

图中没有与'var‘相对应的值，它只是以'var’的形式出现。

a <- data.frame(date = 1:5, co2 = 11:15, year = 2021:2025) 
var = 2021
for (var in 2021:2025) {
    print(
        a %>% 
            filter(year == var) %>% 
            ggplot(aes(date, co2)) +
            geom_point() +
            ggtitle(expression(paste(
                bolditalic(var),
                bolditalic("KOR CO2"))))
    )
}

我希望图形标题是2021 KOR CO2，2022 KOR CO2，2025年KOR CO2。

你能解决这个问题吗？

Answer 1

除了MrFlick的解决方案：ggplot还提供了由一个或两个分组变量自动设置和绘制数据的功能。您可以使用facet_wrap和facet_grid方便地实现这样的面图。就你而言：

a %>%
    ggplot(aes(date, co2)) +
    geom_point() +
    facet_wrap(~ year)