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：

，它将会有效

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函数实际上是一种表达式列表的方法很有用，然后将逗号保留为该进程的分隔符。这意味着你不能在一个你想要在一个不同元素中的“裸”逗号。紧随% - 符号之后的逗号被引号保护不被解析。这可以完全用plotmath（） - ified：

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（）用来分隔其特殊内容的符号。