使用下标绘制图例并在R中插入存储的值

Question

尝试在我的情节中添加一个图例，该图例应显示我之前计算过的一些拟合参数，下标和每个参数的新行，但我似乎无法制作一个符合标题的图例例如substitute()和paste()在一起。 legend()似乎总是打破argument "legend" is missing, with no default。显然substitute()无法进行换行，mtext()有点......麻烦，与人类可读的＆＃34;井下＆＃34;相比。 legend()中的参数。

就我而言：

paramX = 1234
paramY = 9876

plot.new()

legend("bottomright",
       bty = "n",
       paste("x[max] = ", paramX,
             "\ny[max] = ", paramY)
)

Answer 1

paramX = 1234
paramY = 9876

plot.new()

expr <- vector("expression", 2)
expr[[1]] <- bquote(x[max]==.(paramX))
expr[[2]] <- bquote(y[max]==.(paramY))

legend("bottomright",
       bty = "n",
       legend = expr)

绘制此结果：

相关文档：help("legend"); help("plotmath"); help("bquote")。

最困难的部分是将两个bquote表达式组合成一个表达向量。