Question

所以我发现R绘图有一些怪癖（我相信）：我正在绘制条形图，可以轻松地将字体更改为＆＃34;倍新罗马＆＃34;这些情节使用par（family =＆＃34; serif＆＃34;，font = 1）但是，我也想绘制分组的条形图，对我来说最适合的功能是条形图。不幸的是，字体拒绝改变par（family =＆＃34; serif＆＃34;，font = 1）命令。

有没有人知道如何更改条形图中的字体？

在下面的示例中，您也可以使用条形图线条或条形图线条来查看par（family =＆＃34; serif＆＃34;，font = 1）对两种情况下字体的影响。

molnames<-c("a")
contactcounts<-c(acounts1,acounts2,acounts3)
d<-data.frame(column1=rep(molnames, each=3),column2=rep(c("1","2","3"), 1), column3=contactcounts)
colour<-c("green", "blue","magenta")
tiff(file="./TEST.tiff", res=1000, width = 8, height = 8,units='in')
par(family="serif", font=1)
barchart(column3 ~ column1,ylab="Y test", groups=column2, d, auto.key = list(columns = 3),  par.settings=list(superpose.polygon=list(col=colour)))
barplot(contactcounts)
dev.off()

Answer 1

barplot()属于R中的基本图形，而barchart()属于莱迪思图形。格子图不使用par()设置。他们使用网格图形设置。

您可以使用trellis.par.set()函数设置其值，您可以在其中提供参数值作为列表。网格参数值可以设置为grid.pars组件。有效的网格参数列表可以在包get.gpar()的{{1}}中看到，其中也包含grid参数。

fontfamily

如果您看到警告/字体没有变化，请自行定义字体系列：

trellis.par.set("grid.pars" = list(fontfamily="Monaco") )

这对我有用

R曲线：设置字体对于条形图和条形图的显示效果不同

1 个答案: