title: geom_text() to label two separate points from different plots in ggplot
body: <p>I am trying to create individual plots facetted by 'iid' using 'facet_multiple', in the following dataset (first 3 rows of data)</p>
  
  <pre><code>iid      Age     iop  al   baseIOP baseAGE baseAL agesurg  
  1     1  1189    20  27.9      21     336   24.9     336  
  2     2   877    11  21.5      16      98   20.3      98  
  3     2  1198    15  21.7      16      98   20.3      98  
  </code></pre>
  
  <p>and wrote the following code:</p>
  
  <pre><code># Install gg_plus from GitHub
  remotes::install_github("guiastrennec/ggplus") 
  
  # Load libraries
  library(ggplot2)
  library(ggplus)
  
  # Generate ggplot object
  p &lt;- ggplot(data_longF1, aes(x = Age, y = al)) +
    geom_point(alpha = 0.5) +
    geom_point(aes(x= baseAGE, y=baseAL)) + 
    labs(x     = 'Age (days)',
         y     = 'Axial length (mm)',
         title = 'Individual plots of Axial length v time')
  
  p1 &lt;- p+geom_vline(aes(xintercept = agesurg),
                     linetype = "dotted",
                     colour = "red", 
                     size =1.0) 
  
  p2&lt;- p1 + geom_text(aes(label=iop ,hjust=-1, vjust=-1))
  
  p3 &lt;- p2 + geom_text(aes(label = baseIOP, hjust=-1, vjust=-1))
  
  # Plot on multiple pages (output plot to R/Rstudio)
  facet_multiple(plot = p3,
                 facets = 'iid',
                 ncol = 1, 
                 nrow = 1,
                 scales = 'free')
  </code></pre>
  
  <p>The main issue I am having is labeling the points. The points corresponding to <code>(x=age, y=axl)</code> get labelled fine, but labels for the second group of points <code>(x=baseIOP, y=baseAL)</code> gets put in the wrong place.<a href="https://i.stack.imgur.com/Sdl97.jpg" rel="nofollow noreferrer">individual plot sample</a></p>
  
  <p>I have had a look at similar issues in Stack Overflow e.g. <a href="https://stackoverflow.com/questions/9109156/ggplot-combining-two-plots-from-different-data-frames">ggplot combining two plots from different data.frames</a></p>
  
  <p>But not been able to correct my code.</p>
  
  <p>Thanks for your help</p>