r - 将表达式与指示变量结合使用作为图标签

Question

我正在循环中创建多个绘图，其中我将不同的标签存储在列表中。这很容易通过粘贴来完成:

i<-1
plot(1,1)
legend("topright", paste("V = ", i))

但是，我也希望有下标，所以我使用表达式函数:

plot(1,1)
legend("topright", expression("V"[accurate]*" = "))

但是当我尝试组合粘贴和表达式时，我不再返回它引用的值:

plot(1,1)
legend("topright", paste(expression("V"[accurate]*" = "), i))

我尝试了多种不同的方式来写出上面的内容，但我始终无法获得下标并返回“1”。

也许同时使用粘贴和表达式并不是解决此问题的正确方法。

Answer 1

我相信使用 as.expression 和 bquote 您可以执行以下操作:

legend("topright", as.expression(bquote("V"[accurate]*" = "*.(i))))

使用 bquote() 时，.( ) 中包含的任何内容都将替换为指定对象的值。