r - R数据颜色的主成分分析

Question

大家好，我有一个简单的问题，但是我在任何教程中都无法得到答案。我已经对一组数据进行了简单的主成分分析，然后使用biplot绘制了数据。

CP <- prcomp(dat, scale. = T)
summary(CP)

biplot(CP)

有了这个，我得到了我的数据在第一和第二部分方面的散点图。我希望按颜色区分数据，指示R将我的前20个数据绘制为红色，然后将20个数据绘制为蓝色。我不知道如何告诉R为这两套数据着色。
任何帮助将不胜感激。 !
(对R非常陌生)

Answer 1

免责声明:这不是直接答案，但可以进行调整以获得所需的输出。

library(ggbiplot)
data(wine)
wine.pca <- prcomp(wine, scale. = TRUE)
print(ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class, ellipse = TRUE, circle = TRUE))