如何在文本中使用多个等号(x,y,表达式(...))

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