Dodaj dynamiczne napisy używając ggplot

Próbuję użyć ggplot, aby dodać napisy. Podobne pytanie zadano tutaj:Jak dodać napisy ggplot2 o innym rozmiarze i kolorze?, a odpowiedź była następująca:

p <- p + ggtitle(expression(atop(paste('TITLE'), atop(italic(paste('SUBTITLE')), ""))))

Jednak słowa'TITLE' i'SUBTITLE' muszą być zakodowane na stałe, przedstawiając problem skalowalności i automatyzacji w przypadku 1000 działek.

To nie działa:

plot.title = 'TITLE'
plot.subtitle = 'SUBTITLE'    
p <- p + ggtitle(expression(atop(paste(plot.title), atop(italic(paste(plot.subtitle)), ""))))

Myślę, że pytanie o to, jak poprawnie dodać dynamiczne napisy, używając tego pomysłu, sprowadza się do: Czy możliwe jest użycie zmiennych znakowych w wyrażeniu i na szczycie?

questionAnswers(1)

yourAnswerToTheQuestion