我试图绘制标题,希腊字符以及变量的平均值。我希望我的情节标题看起来像这样(但是居中)
标题
μ= 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 =参数......?
答案 0 :(得分:9)
您可以使用atop
:
hist(d, main=bquote(atop(Title,mu==.(mean(d)))))
答案 1 :(得分:2)
使用plain()
功能指定普通文本,并使用*
,~
和~~
作为间隔符:
mtext(main=bquote(plain("Observation at pH ") ~ .(pH) ~~ plain(" [") * mu * plain("M]")))
这在?plain
中有点加密解释(在R命令行提示符中输入时,转换为关于plain的帮助)。然后,您将获得帮助页面Mathematical Annotation in R
,然后在该页面中搜索plain。