2
4

1 回答 1

3

感谢@agstudy 为我指明了正确的方向，进行了一些调整，但最终做到了：

   legend(...expression(""<="1.0"),col="gray"...)

更多的符号可以在 using 中找到?plotmath（见这里）并使用实现expression()

这是一个例子：

在此处输入图像描述

x <- 0:64/64
y <- sin(3*pi*x)
plot(x, y, type= "l", col= "blue",
     main= expression("How to add the symbol"<="to a legend"))
points(x, y, pch= 1, bg= "white")
legend(.4,1, expression(""<= "1.0"), pch= 1, pt.bg= "white", lty= 1, col= "blue")
于 2013-06-26T12:03:14.970 回答