在R中更改箱形图字体

Question

我正在尝试通过R中的以下命令将boxplot字体更改为"Times New Roman“：

library(extrafont)
loadfonts(device="win")
fonts()
boxplot(sp ~ grp, data = mydata,family="Times New Roman")

但是绘图中的字体不会改变。如何更改箱线图中的所有文本？预先感谢You can see the results here

Answer 1

试试这个：

windowsFonts(
  A=windowsFont("Arial Black"),
  B=windowsFont("Bookman Old Style"),
  C=windowsFont("Comic Sans MS"),
  D=windowsFont("Times New Roman")
)
par(mfrow=c(2,2))
for (f in LETTERS[1:4]) {
  par(family=f)
  boxplot(Sepal.Length ~ Species, data = iris, main = "Title", font=2)  
}

​

​

Answer 2

不能通过在boxplot()中设置family来更改字体系列。而应在调用boxplot()之前使用par(family = "Times New Roman")修改此图形参数。

下面是一个可重复使用的示例：

boxplot(count ~ spray, data = InsectSprays)
boxplot(count ~ spray, data = InsectSprays, family = "serif")
# -> 'family' has no effect here

par(family = "serif")
boxplot(count ~ spray, data = InsectSprays)
# -> font has changed