在mtext中为两个变量引用bquote

Question

我想绘制一些数据的直方图，添加标题和平均值 数据的标准偏差。我使用mtext和bquote：

a <- rnorm(100)
hist(a, main="A")
mtext(bquote(mu==.(round(mean(a)), sigma==.(sd(a)))))

但是，只绘制mu，似乎我并不完全理解bquote。我怎么能在彼此旁边或上面绘制mu和sigma？

Answer 1

您需要bquote()和某些plotmath symbols的组合。

a <- rnorm(100)
hist(a, main="A")
mean.a <- round(mean(a))
sd.a <- round(sd(a))
mtext(bquote(mu== ~.(mean.a) ~ sigma== ~.(sd.a)))

修改

如果你想让对方彼此重叠，因为plotmath不支持换行，你可以像这样逐个创建你的行：

Lines <- list(bquote(mu== ~.(mean.a)),
              bquote(sigma== ~.(sd.a)))
mtext(do.call(expression, Lines),side=3,line=0.5:-0.5)