将表达式与指示变量结合使用于情节标签

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