将 R 表达式中的向量变量组合为绘图文本

Question

我正在尝试在 R 图中创建一个文本层，其中包含从变量派生的正常和上标文本。

到目前为止，我有这个：

first = c("one", "two", "three")
second = c(1, 2, 3)
plot(1:3, 3:1)
text(1:3, 3:1, labels=first)

它现在的工作方式，它在情节上显示一、二等。我希望它显示一个¹、两个²等

我猜它应该是expression、paste、bquote 的某种组合，也许还有其他功能。我只是无法让它将数据作为向量读取并制作正确的上标。

我在这个网站上看到了一些问题，例如：

• Combining paste() and expression() functions in plot labels
• Use expression with a variable r
• Including variables in expression call in R

他们都没有完全回答我的问题。

Answer 1

你可以试试

 plot(1:3, 3:1)
 text(1:3, (3:1)-0.03, labels= mapply(function(x,y)
      as.expression(bquote(.(x)^.(y))), first, second))