我有一个字符矢量：
x <- c("species1", "species2", "species3")
我想在一个情节中添加这些元素中的每一个，例如，如图所示：
legend("topleft", x[1], bty="n")
但问题出现了：它需要用斜体字表示。
我所做的就是试试这个：
legend("topright",expression(italic(x[1])), bty="n")
但是，x[1]（在这种情况下为"species1"）中的值不是斜体，而是用斜体显示的是"x[1]"本身！
有什么方法可以解决这个问题吗？
答案 0 :(得分：0)
您可以使用substitute交换表达式中的变量。这应该工作
legend("topright",legend=substitute(italic(x), list(x=x[1])), bty="n")