如何用legend命令在图形上写希腊字母？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

我现在想用一个legend命令输出一个scatterplot的correlation coefficient 的ρ和p。输出想要分2行，一行是ρ，一行是p。
使用了Hmisc。命令如下：
r0=round(rcorr(x,y)[[1]][1,2],4)
plot(x,y,main="x vs. y", xlab="x",ylab="y")
legend("topright", legend=c(paste("rho =",r0), paste("p =",round(rcorr(x,y)$P[1,2],4))),col=c(1,2),inset=0.02)
我想把那个rho变成希腊字母ρ，但是试了很多次都不对。如果rho正确了，后面的那个数字输不出来了。
我试过：
legend("topright", legend=c(expression(paste(rho," =",r0)), paste("p =",round(rcorr(x,y)$P[1,2],4))),col=c(1,2),inset=0.02)
这样输出，前面的ρ是出来了，但是r0只是字母，不是数字。
还试过：
  legend("topright", legend=c(paste(expression(paste(rho," =")),r0), paste("p =",round(rcorr(x,y)$P[1,2],4))),col=c(1,2),inset=0.02)
这样后面数字出来了，但是前面的ρ不出来。想请教各位，如何写才能让2个都出来。而且分成2行输出呢？谢谢！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Legend 希腊字母 egen Leg End

该问题可以参考谢益辉的那本现代统计图形