1

有没有办法在 strucplot 框架中更改基于残差的图例的字体？通过在 labeling 和 labeling_args 参数中指定字体，我在马赛克图中创建了标签，并使用 serif 字体创建了扩展关联图。这使得图中的文本是衬线字体。我也尝试通过在代码的开头和结尾调用 par(family="serif") 来制作衬线字体的基于残差的图例，但这不会使图例文本衬线。

我的数据是一个包含行名和列名的 6x3 数组：

   names<-c("A", "B", "C", "D", "E")
   y<-c(340, 37, 110, 17, 71)
   z<-c(720, 14, 6, 141, 120)
   x<-data.frame(names, y, z, row.names=TRUE); x
   attach(x)
   library(vcd)

我正在使用的代码是：

   op<-par(family="serif")
   my.largs<-list(gp_labels=gpar(fontsize=12, fontfamily="serif"), gp_varnames=gpar(fontsize=12, fontfamily="serif", fontface="italic"))

   names(dimnames(x))<-c("Name1", "Name2")
   mosaic(t(x), gp=shading_Friendly, compress=FALSE, gp_text=gpar(fontsize=12, fontfamily="serif"), labeling=labeling_values, labeling_args=my.largs)
   par(op)

我在 Mac OS X 10.6 上使用 Rstudio（版本 0.97.551）到 R（版本 2.14.0）。我是一个相对缺乏经验的 R 用户。任何帮助，将不胜感激。

4

2 回答 2

0

我还尝试通过 legend()、legend_args() 和 legend_resbased() 等参数指定字体，但都没有奏效。vcd 包的作者后来告诉我，目前无法像现在一样为 vcd 图指定残差图例的字体，但他将尝试在即将发布的版本中添加这样的参数。

于 2013-08-18T02:20:41.987 回答
0

将字体合并到现在mosaic()使用的legend_resbased()作品中

于 2020-11-21T16:24:31.787 回答