Я пытаюсь использовать ggplot для добавления субтитров. Аналогичный вопрос задавали здесь: Как добавить подзаголовок ggplot2 с разными размерами и цветом?, и ответ был следующим:
p <- p + ggtitle(expression(atop(paste('TITLE'), atop(italic(paste('SUBTITLE')), ""))))
Однако слова 'TITLE'
и 'SUBTITLE'
должны быть жестко запрограммированы, представляя проблему масштабируемости и автоматизации при работе с тысячами графиков.
Это не работает:
plot.title = 'TITLE'
plot.subtitle = 'SUBTITLE'
p <- p + ggtitle(expression(atop(paste(plot.title), atop(italic(paste(plot.subtitle)), ""))))
Я думаю, вопрос о том, как правильно добавлять динамические субтитры, используя эту идею, сводится к: возможно ли использовать переменные символов внутри выражения и поверх?