代替在绘图上不显示文本答案

【问题标题】：Substitute not displaying text on plots代替在绘图上不显示文本
【发布时间】：2013-10-14 10:51:51
【问题描述】：

我最近刚刚了解了plotmath 及其将数学表达式以文本形式显示在图上的能力。

但是我遇到了一些奇怪的行为，substitute 函数不呈现任何文本。

这是一个应该可以工作的简单案例（来自this answer）：

labNames <- c('xLab','yLab')
plot(c(1:10),
     xlab=substitute(paste(nn, x^2), list(nn=labNames[1])),
     ylab=substitute(paste(nn, y^2), list(nn=labNames[2])))

当我运行这段代码 sn-p 时，没有 xlab 或 ylab 文本。

我正在运行 mac osx 和 R 3.0.0。无论我输出到 Quartz 还是输出到 png 文件，这个问题仍然存在。

这是我的 sessionInfo()：

R version 3.0.0 (2013-04-03)
Platform: x86_64-apple-darwin12.3.0 (64-bit)

locale:
[1] en_AU.UTF-8/en_AU.UTF-8/en_AU.UTF-8/C/en_AU.UTF-8/en_AU.UTF-8

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base

【问题讨论】：

为我工作...（在 Windows 上）。
当我使用bquote 时问题仍然存在。但是，如果我不尝试替换任何值，我可以使用plotmath 获取要呈现的文本。
它在我可以访问的 linux 服务器上按预期工作。
我怀疑Quartz 是罪魁祸首。
也适用于我（Windows R 版本 3.0.2）

标签： r osx-mountain-lion plotmath

【解决方案1】：

我找到了罪魁祸首：在我的 .Rprofile 中与 option 进行了奇怪的交互

如果我不加载 devtools 包，以下行会导致问题：

options(devtools.desc.author="'Scott Ritchie <sritchie73@gmail.com> [aut, cre]'")

奇怪的是，如果我定义其他不相关的选项似乎没有问题（options(notanoption=TRUE) 没有引起任何问题）。

【讨论】：