autoplot - How to adjust loading labels?
<p>I would like to be able to adjust the positions of the loading labels, so that they do not fall atop the the arrows. However, I do not know where the adjustments need to be made. The <code>geom_text</code> can be used to adjust the position of the site positions, but I cannot find where the vectors are stored in <code>str(g)</code>.</p>

<pre><code>library(ggplot2)
library(ggfortify)
df &lt;- data.frame(replicate(10,sample(-10:10,10,rep=TRUE)))
names(df) &lt;- c('up','down','left','right','circle','square','triangle','x','r1','l1')
rownames(df) &lt;- paste('Dummy Site', seq(0,9,1))
g &lt;- autoplot(prcomp(df[,-11], scale=TRUE), data=df,
              loadings.label=TRUE, loadings=TRUE, 
              loadings.label.size=8, loadings.colour='blue',
              label.size=5) +
     geom_text(vjust=-1, label=rownames(df)) +
     theme(plot.background=element_blank(),
           panel.background=element_rect(fill='transparent',color='black',size=1),
           legend.text=element_text(hjust=1),
           legend.key=element_blank()) 
g
</code></pre>

<p>I've looked in <code>ggplot2::theme</code> and I've examined the help docs for <code>autoplot</code>, but can't find any mention of the adjusting label position. Bonus points if it can adjust based on the vector of the arrow, but a static adjustment would be acceptable.</p>

<p>Currently, here is what the plot looks like:
<a href="https://i.stack.imgur.com/byaJ1.png" rel="nofollow"><img src="https://i.stack.imgur.com/byaJ1.png" alt="An example of what the above code generates"></a></p>