Я попытался провести анализ матрицы pca.
Заранее спасибо за большую помощь!
С уважением,
Yue
plot(pca)
{plot(pca$x[,1],pca$x[,2])
points(pca$x[1:14,1],pca$x[1:14,2],col=2,pch=2)
points(pca$x[16:31,1],pca$x[15:31,2],col=3,pch=2)
}
Пробовал:
> length(pca$x[,1])
[1] 31
> length(pca$x[,2])
[1] 31
> lines(pca$x[,1],pca$x[,2])
Plot is:
[1]: https://i.stack.imgur.com/NuA59.png