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))))

查看下图了解当前状态:
sample image

我想使用类似的东西:

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

但它会产生错误。

Answer 1

使用 {}围绕第一个平等放置一个无形的分组。

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