Analiza głównych składników w kolorze danych R

Question

Witam wszystkich Mam proste pytanie, ale na które nie byłem w stanie uzyskać odpowiedzi w każdym samouczku. Zrobiłem prostą analizę głównych składników na zbiorze danych, a następnie narysowałem moje dane za pomocą biplota.

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

biplot(CP) 

Dzięki temu otrzymuję wykres punktowy moich danych pod względem pierwszego i drugiego komponentu. Chcę oddzielić dane według koloru, wskazując R, aby pomalować moje pierwsze 20 danych w kolorze czerwonym, a następne 20 w kolorze niebieskim. Nie wiem, jak powiedzieć R, aby pokolorować te dwa zestawy danych. Każda pomoc będzie bardzo ceniona. thks! (im bardzo nowym R)

Answer 1

Korzystanie plot() zapewni większą elastyczność - można go używać samodzielnie lub z text() dla etykiet tekstowych belows (dzięki @flodel do przydatnych uwagi):

col = rep(c("red","blue"),each=20) 
plot(CP$x[,1], CP$x[,2], pch="", main = "Your Plot Title", xlab = "PC 1", ylab = "PC 2") 
text(CP$x[,1], CP$x[,2], labels=rownames(CP$x), col = col) 

jednak jeśli chcesz używać biplot() wypróbować ten kod:

biplot(CP$x[1:20,], CP$x[21:40,], col=c("red","blue")) 

Answer 2

Zastrzeżenie: nie jest to bezpośrednia odpowiedź, ale można je dostosować do uzyskania pragnienie d wyjście.

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))