Superscript R为传奇而战

Question

我想为我的传说写一个R平方的术语，但我不知道如何。 有人可以帮帮我吗？ 我的传奇语法是：

legend(2,10, c("BW (MPE=3%, R-squared=0.77)", 
       "MY (MPE=5%, R-squared=0.80)", pch=c(2,3))

我会像文本中通常所说的那样将R平方表示为R2。

Answer 1

如果你把bquote和as.expression结合起来bquote as.expression ：

plot(1:10)
legend(2, 10, c(as.expression(bquote("BW (MPE = 3%," ~ R^2 ~ "= 0.77)")),
                as.expression(bquote("MY (MPE = 5%," ~ R^2 ~ "= 0.80)"))), 
       pch=c(2,3))

Answer 2

这比使用c( as.expression ( bquote...多次：

plot(1:10)
legend(2, 10, expression("BW (MPE = 3%," ~ R^2 ~ "= 0.77)",
                 "MY (MPE = 5%," ~ R^2 ~ "= 0.80)"), 
        pch=c(2,3))

理解expression函数实际上是一种制作表达式列表的方法很有用，然后将逗号保留为该进程的分隔符。 这意味着你不能在一个你想要在一个不同元素中的“裸”逗号。 % -signs之后的逗号会受到保护，不会被引号解析。 这可以完全plotmath（） - ified with：

plot(1:10)
legend(2, 10, expression(BW * list(MPE == 3*'%',
                                   R^2 == 0.77),
                         MY * list( MPE == 5*'%',
                                   R^2 == 0.80)
                         ), 
       pch=c(2,3))

这样，唯一需要特别注意的角色是'％' - plotmath（）用来分隔其特殊内容的符号。