r - 如何在 text(x,y,expression(...)) 中使用多个等号

Question

是否有在表达式中使用多个等号的解决方案（不在括号内）？我目前正在使用“=”进行操作。但这不是很好，因为 == 和 " = " 在情节上看起来不同。

最小样本：

plot(0:5,0:5, type="n")
saleprice <- 35
revenue <- 98000
text(1, 2, 
     bquote(paste(R(x[G]) == .(saleprice)%.%x[G], " = ", .(revenue))))

当前状态见下图： 示例图

我想使用类似的东西：

bquote(R(x[G]) == .(saleprice)%.%x[G] == .(revenue))

但它会产生错误。

Answer 1

用于{}在第一个等式周围放置一个不可见的分组。

text(1, 2, bquote({R(x[G]) == .(saleprice)%.%x[G]} == .(revenue)))