string - 带有希腊字母、换行符和变量值的 R 绘图标题

Question

我正在尝试绘制一个标题、一个希腊字符以及一个变量的平均值。我希望我的情节标题看起来像这样（但居中）

标题

μ=1.2

我做了一些尝试：

d <- rnorm(100)
hist(d, main=expression(paste("Title\n", mu, "=", mean(d))))
hist(d, main=expression(paste("Title\n", mu, "=", mymean), list(mymean=mean(d))))
hist(d, main=paste(expression(paste("Title\n", mu, "="), mean(d))))
hist(d, main=expression(atop("Title", substitute(mu, "=", mymean, list(mymean=mean(d))))))
hist(d, main=expression("Title\n", substitute(mu, "=", mymean, list(mymean=mean(d)))))

但我不知道如何在标题中使用expression或正确使用。substitute我知道这mtext是一种可能性，但它应该使用 main= 参数来工作......？

Answer 1

你可以这样做atop：

hist(d, main=bquote(atop(Title,mu==.(mean(d)))))

Answer 2

使用该plain()函数指定普通文本和*,~和~~作为间隔符：

mtext(main=bquote(plain("Observation at pH ") ~ .(pH) ~~ plain(" [") *  mu * plain("M]")))

?plain这在（当在 R 命令行提示符中键入时转换为关于纯文本的帮助）中有些神秘地解释了这一点。然后您将获得帮助页面Mathematical Annotation in R，然后在该页面中搜索 plain。