title: Combining vector variables in R expression for plot text
body: <p>I am trying to create a text layer in an R plot containing normal and superscript text that derives from variables.</p>
  
  <p>So far I have this:</p>
  
  <pre><code>first = c("one", "two", "three")
  second = c(1, 2, 3)
  plot(1:3, 3:1)
  text(1:3, 3:1, labels=first)
  </code></pre>
  
  <p>The way it works now, it shows one, two, etc on the plot. I want it to show one<sup>1</sup>, two<sup>2</sup>, etc.</p>
  
  <p>I guess it should be some combination of <code>expression</code>, <code>paste</code>, <code>bquote</code> and maybe another function. I just can't get it to get it to read the data as vectors and make the proper superscript.</p>
  
  <p>I've seen some questions on this site, for example:</p>
  
  <ul>
  <li><a href="https://stackoverflow.com/q/4973898/2104287">Combining paste() and expression() functions in plot labels</a></li>
  <li><a href="https://stackoverflow.com/q/15074127/2104287">Use expression with a variable r</a></li>
  <li><a href="https://stackoverflow.com/q/3345625/2104287">Including variables in expression call in R</a></li>
  </ul>
  
  <p>None of them fully answer my question.</p>