r - 使用 textplot(gplots 或 PerformanceAnalytics)左对齐一列

Question

我正在使用 gplots 中的 textplot() 将 data.frame 中的一些文本写入 PDF 设备(也尝试使用 PerformanceAnalytics 中的版本)。我的 par() 选项是默认选项，除了我更改字体/边距(CM 是我在站点配置文件中定义的一个系列)

par( family = "CM" , omi = rep( .5 , 4 ) )

我试图让“情节”列保持合理。这是我失败的尝试...注意文本中的重叠

textplot( tableOfContents , show.rownames = FALSE , show.colnames = TRUE , hadj = 0 )

右对齐工作得很好:

textplot( tableOfContents , show.rownames = FALSE , show.colnames = TRUE , hadj = 1 )

编辑
如果其他人在 texplot 中遇到对齐问题，我建议看看我写的这个修改过的版本:
https://gist.github.com/1487363

编辑2
您可能想删除我的 cex=1 修复程序。经过更多阅读后，我明白函数参数中的 cex 应该应用于 par(cex)，我认为这令人困惑和过度设计，但似乎是 R 的标准做法

Answer 1

看源码，我觉得最好的办法是稍微修改一下，让x位置适应hadj ，而不是保持不变。向开发人员建议此更改也可能是值得的。这是一个要点，您可以在其中下载修改后的版本:

https://gist.github.com/1482973

然后只需使用 source() 在 R 中获取它，您应该可以像平常一样使用该功能。

source('textplot.R')
n = 10
data = data.frame(Section=1:n, Plot=replicate(n, paste(LETTERS[sample(26, sample(20), replace=T)], collapse='')), Page=sort(rep(1:4, len=n)), stringsAsFactors=FALSE)

textplot(data, show.rownames = FALSE, show.colnames = TRUE, hadj=0)