无法更改textGrob中的字体

Question

我希望有人可以帮助我自定义文本标签grid.arrange.我有四个图,我正在列中列出一个共享图例.我试图改变"左"标签的字体,grid.arrange但我无法弄清楚这是如何textGrob工作的.我当前的代码(带p1- p4作为ggplot对象)是:

windowsFonts(Georgia=windowsFont("TT Georgia"))

plots <- list(p1, p2, p3, p4)
g <- ggplotGrob(plots[[1]])
leftText <- textGrob("Percent Savings", rot=90, gp=gpar(font="Georgia"))
grid.arrange(
             do.call(arrangeGrob, c(plots, nrow=4)),
             left    = leftText,
             top     = " ",
             ncol    = 1,
             heights = c(8))

图例中的字体更改正确,但左侧字体仍为默认字体.我试过了font ="Georgia"和family="Georgia".任何想法我怎么能让这个工作？

编辑:对于有这个问题的其他人,我终于偶然发现了一个答案,在textGrob中命令不是"字体"或"家庭".事实上,它是"fontfamily".

Answer 1

正如OP所指出的那样,grid参数被称为fontfamily,

 grid.text("haha", gp=gpar(fontfamily = "Zapfino", cex=5))