PCA biplot in R

And a related non-phyloseq solution here as well.