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