Приведенные выше комментарии являются хорошим советом, но ответ на ваш вопрос заключается в том, что вы не можете использовать более одного цвета для наблюдений в версии biplot
в пакете stats
(см. Справочные страницы ?biplot.prcomp
и ?biplot.default
). Однако вы можете использовать разные символы:
PCA <- prcomp(USArrests, scale = TRUE)
sym <- c(rep("x", 25), rep("o", 25))
biplot(PCA, scale=0, xlabs=sym)
![Biplot](https://i.stack.imgur.com/pwhxH.png)