网格排列标题斜体

Question

大家好我试图找出如何在网格排列标题中使用斜体字。我尝试过bquote方法，但它不会对标题进行图形化。谢谢！

full_title <- bquote(paste(italic(Tamarix),"Green Foliage %"))

grid.arrange(Dry_16, Dry_17, nrow=1, ncol=2,top=full_title)

Answer 1

library(gridExtra)
full_title <- expression(italic(Tamarix)~"Green Foliage %")

rg <- grid::rectGrob()
grid.arrange(rg, rg, ncol=2,top=full_title)