How do I make the biplot of my PCA more readable

Hi all,

I am trying to graph my PCA to look at what species are grouped together for future analysis in my project. My problem is the graph is unreadable and I am not sure how to make it more appealing and useful. Can I adjust the label size or color code each species some how? Or can I change the numbers underneath to dots or remove them completely?

Species.PCA <- prcomp(SpeciesData,
                   center=TRUE,
                   scale.=TRUE)
print(Species.PCA)

plot(Species.PCA)

summary(Species.PCA)

biplot(Species.PCA)
ID BEVI BEWR BGGN BHCO BLGR CACH CASP CARW DICK EAME FISP GRSP INBU LASP MODO NOBO NOCA NOMO PABU RCSP STFL TUTI WEME WEVI YBCU
18BR3015 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
18BR3019 0 0 0 0 0 0 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
18BR3043 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0
18BR3051 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
18BR3070 0 0 0 0 0 0 0 0 0 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0
18BR3085 0 0 0 0 0 0 1 0 0 0 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0
18BR3091 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
18BR3112 0 0 0 0 0 0 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0
18BR3136 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
18BR3147 0 0 0 0 0 0 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0

Thank you

Hi!

To help us help you, could you please prepare a reproducible example (reprex) illustrating your issue? Please have a look at this guide, to see how to create one:

I added some of my data and the code that I am using. I really need advice on how to space the labels or color code the species. The current code and data is running fine I just dont know if there is a way to make it readable.

Hi Jenny,
I'm afraid the data hasnt been shared in your edit.
If I copy and paste your code, then I get an error that SpeciesData is not found.

Yes, the SpeciesData is my own personal data so just running this code in r will not work. I put an example data frame in the post. I cant really provide you with the data because its very large, I am not sure I am allowed to as a grad student and there is no way for me to upload and excel file or r file. You can reproduce a similar graph be replacing "SpeciesData" with "mtcars".

Species.PCA <- prcomp(mtcars,
                   center=TRUE,
                   scale.=TRUE)

It still produces the same issue, labels are overlapping and unreadable. Its mainly just a design question, is there a way to make it look better? A diferent way of graphing or a command that I am missing?
Mtcars Example

try GitHub - vqv/ggbiplot at experimental

it can make :

This topic was automatically closed 21 days after the last reply. New replies are no longer allowed.

If you have a query related to it or one of the replies, start a new topic and refer back with a link.