bquote in mtext for two variables
我想绘制一些数据的直方图,添加标题和均值,然后
数据的标准偏差。我使用
1 2 3 | a <- rnorm(100) hist(a, main="A") mtext(bquote(mu==.(round(mean(a)), sigma==.(sd(a))))) |
但是,只绘制了mu,看来我并不完全理解
您需要
1 2 3 4 5 | 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))) |
编辑
如果您希望彼此叠加,因为
1 2 3 | Lines <- list(bquote(mu== ~.(mean.a)), bquote(sigma== ~.(sd.a))) mtext(do.call(expression, Lines),side=3,line=0.5:-0.5) |