R绘图标题与希腊字母,换行符和变量值

时间:2013-04-11 11:45:39

标签: string r plot expression special-characters

我试图绘制标题,希腊字符以及变量的平均值。我希望我的情节标题看起来像这样(但是居中)

标题

μ= 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)))))

但我不知道如何在标题中正确使用expressionsubstitute。我知道mtext是可能的,但它应该使用main =参数......?

2 个答案:

答案 0 :(得分:9)

您可以使用atop

执行此操作
hist(d, main=bquote(atop(Title,mu==.(mean(d)))))

enter image description here

答案 1 :(得分:2)

使用plain()功能指定普通文本,并使用*~~~作为间隔符:

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

这在?plain中有点加密解释(在R命令行提示符中输入时,转换为关于plain的帮助)。然后,您将获得帮助页面Mathematical Annotation in R,然后在该页面中搜索plain。