Screeplot() function for sPCA is extremely slow.

[cms2775]

Hi,

I'm currently running the sPCA function in Adegenet with a very large dataset (aroud 120 samples and 40,000 SNPs). The spca function works fine and generates the correct output when run for about a day on our server. However, when I call the screeplot() function on my spca object, It appears to start the entire calculation over and ran for about a day before stalling. Is there an alternative?