R:图例表达式如何在两个值之间添加逗号以及如何抑制科学记数法

Question

我试图在我的情节中格式化图例，但由于希腊语和上标，我必须使用 expression() 。但是，当我想显示 r^2 = 0.45, P<0.0001 时，当我输入时，我得到 r^2 = 0.45 P<1e-04

legend(expression(r^2==0.9230~~P<0.0001))

我尝试查找 list() 函数，但它对逗号没有帮助。我也找不到任何关于在 expression() 函数中使用小数的信息。

任何建议，将不胜感激。

谢谢

Answer 1

您可以使用 paste() (在对 expression() 的调用中)将字符串和未加引号的表达式拼接在一起。未加引号的位将使用 example(plotmath) 展示的特殊规则进行评估。和 demo(plotmath) , 而字符串将逐字打印。

这是一个示例(它也使用 phantom() ，因为 < 运算符期望/需要 东西 在其左侧和右侧):

plot(1)
legend(x = "topleft", 
       legend = expression(paste(r^2==0.9230, ",  ", P<phantom(), "0.0001")))