我有一个字符向量：
x <- c("species1", "species2", "species3")
我想将这些元素中的每一个添加到一个图中，作为一个图例，例如，像这样：
legend("topleft", x[1], bty="n")
但是我的问题来了：它必须是斜体。
我要做的是尝试这个：
legend("topright",expression(italic(x[1])), bty="n")
然而，我得到的不是斜体的值x[1]（在这种情况下：），而是斜体本身！"species1""x[1]"
有没有办法解决这个问题？