r - 绘图轴标题上的特殊字符和上标

Question

我正在尝试制作一个带有特殊字符和上标的 y 轴标题。我可以做到这一点，但我希望右括号不要成为上标。这就是我遇到的问题。我认为这只是我的括号的放置，但我已经尝试了(似乎)一切。

plot(WatexCl, ConcuM, col = as.numeric(1), pch = as.numeric(Depth), 
   xlab = expression(paste("Concentration Cl  ( ", mu, "moles/g dry wt)")), 
   ylab = expression(paste("Average Conc of S- on plates ( ", mu, "Moles/cm"^"2"),)), 
   data = plates)

Answer 1

用户经常无法理解的一件事是，在绘图标签的表达式中使用时，您总是不需要引用字符串并将它们粘贴在一起。直接使用布局工具通常更简单(例如 ~ 和 *)。例如:

df <- data.frame(y = rnorm(100), x = rnorm(100))

plot(y ~ x, data = df,
     ylab = expression(Average ~ Conc ~ of ~ S- ~ on ~ plates ~ 
                       (mu ~ Moles ~ cm^{-2} ~ dry ~ wt)),
     xlab = expression(Concentration ~ Cl ~ (mu ~ moles ~ g^{-1} ~ dry ~ wt)))

或者，您可以包含较长文本部分的字符串；在这种情况下，可以说更容易做到:

plot(y ~ x, data = df,
     ylab = expression("Average Conc of S- on plates" ~
                         (mu ~ moles ~ cm^{-2} ~ "dry wt")),
     xlab = expression("Concentration Cl" ~ (mu ~ moles ~ g^{-1} ~ "dry wt")))

但请注意，无需在此处粘贴字符串和其他功能。

两者都产生:

请注意绘图中上标 2 的问题。您可能希望为 y 轴边距添加一些额外的空间以适应这一点:

op <- par(mar = c(5,4.5,4,2) + 0.1)
plot(y ~ x, data = df,
     ylab = expression("Average Conc of S- on plates" ~
                          (mu ~ moles ~ cm^{-2} ~ "dry wt")),
     xlab = expression("Concentration Cl" ~ (mu ~ moles ~ g^{-1} ~ "dry wt")))
par(op)

制作