R ggplot标题标签中的不同颜色

Question

我可以在ggplot中绘制图表并添加标题：

library(ggplot2)
plot <- ggplot(PlantGrowth, aes(x=group, y=weight)) + geom_boxplot()
plot
plot <- plot+ ggtitle("red label\nblue label")
plot

但是如何更改标题中的颜色，所以标题的第一部分是红色，第二部分是蓝色？

感谢您的帮助。

Answer 1

感谢old google groups page：

，我想通了

print(plot, vp=viewport(height=0.8))
grid.text(0.5, unit(1,"npc") - unit(1,"line"), 
          label="Red text\n",
          gp=gpar(col="red"))
grid.text(0.5, unit(1,"npc") - unit(1,"line"), 
          label="\nBlue text",
          gp=gpar(col="blue"))