text（）在R图中显示带下标的希腊字母

Question

我想知道如何在下面的R代码的text（）部分中使字母“ sigma ”在希腊语中带有下标 “ m ” 吗？：

curve(dnorm(x,175.3,.961),160,190,type="l")

sigmam <- dnorm(177.4,175.3,.961)/ dnorm(177.4,176,4)

text(165,.285,paste("sigmam", "=", round(1/sigmam,digits=2)))

Answer 1

查看?plotmath有关如何将这种事情组合在一起的相关示例。举例来说，这里的一个改编自“ ##如何结合‘数学’和数值变量： ”

curve(dnorm(x,175.3,.961),160,190,type="l")
sigmam <- dnorm(177.4,175.3,.961)/ dnorm(177.4,176,4)

text(165,.285, bquote(Sigma[m] == .(round(sigmam,2))))