防止线条在图例中出现两次

Question

大约一个小时前Align symbols in the legend，我问过一个关于这个传说的问题，但现在出现了一个新问题。我想在我的图例中添加线条。我尝试了以下内容：

plot(1:4)
legend("topleft",legend=expression(theta[1]==7%*%10^-4,theta[1]==0,
                                   theta[2]==-14%*%10^-4,theta[2]==0),
       lty=c(2,1),lwd=2,col=c("blue","grey"),bty="n",cex=1.2,ncol=2)

但是每行只能出现一次：第一行有一条蓝线，第二行有一条灰线。然后我尝试插入零，所以lty=c(2,1,0,0)，但在thetas之间出现了空格。

应该是这样的：

有没有人建议我如何防止这些线条在我的图例中出现两次？

Answer 1

实际上这些行只出现了 4 次，因为您创建了一个 4 元素表达式向量。 （lines 参数正在被回收。）这个解决方案“保护”内部逗号不被解释，尽管再次查看它，我发现这个顺序不是你想要的。你应该能够解决我已经演示了如何更好地在表达式中包含逗号的问题：

plot(1:4)
legend("topleft",legend=expression(theta[1]==7%*%10^-4*","~theta[1]==0,
                                   theta[2]==-14%*%10^-4*","~theta[2]==0),
       lty=c(2,1),lwd=2,col=c("blue","grey"),bty="n",cex=1.2,ncol=2)

您可能需要调整位置，因为它会影响到第四个点，但话又说回来，这显然不是您的用例。考虑使用 ncol=1。

对编辑的回应：所以您不需要逗号，而只需要空格。添加更多波浪号：

png(); plot(1:4)
legend("topleft",legend=expression(theta[1]==7%*%10^-4~theta[2]==-14,
                                   theta[1]==0 ~~~~~~~~~~~~theta[2]==0),
 ncol=1, lty=c(2,1),lwd=2,col=c("blue","grey"),bty="n",cex=1.2);dev.off()