无法更改textGrob中的字体

Question

我希望有人可以帮助Name中的自定义文字标签。我有四个图，我正在列中列出一个共享图例。我正在尝试更改＆＃34; left＆＃34;的字体。 grid.arrange中的标签，但我无法弄清grid.arrange如何为此工作。我当前的代码（textGrob - p1为p4个对象）是：

ggplot

图例中的字体更改正确，但左侧字体仍为默认字体。我试过了font =＆＃34; Georgia＆＃34;和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)) 。我有什么想法可以让它发挥作用吗？

编辑：对于有这个问题的其他人，我终于偶然发现了一个答案，在textGrob中命令不是＆＃34; font＆＃34;或＆＃34;家庭＆＃34;。事实上，它是＆＃34; fontfamily＆＃34;。

Answer 1

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

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