Wie kann ich diese auf Graphen auf demselben und in verschiedenen Farben zeichnen?

Question

Ich muss nur diese Grafiken auf die gleiche, und die Punkte der ersten müssen in einer anderen Farbe als die zweite sein. Ich denke, es ist etwas sehr einfaches, aber ich kann es nicht finden, bitte helfen Sie. Danke

library(ggfortify) 
myPCA <- prcomp(iris[-5]) 
# drawing PC1 and PC2 
autoplot(myPCA) 
# drawing PC3 and PC4 
myPCAtrunc <- myPCA 
myPCAtrunc[[1]] <- myPCAtrunc[[1]][c(3,4,1,2)] 
myPCAtrunc[[2]] <- myPCAtrunc[[2]][,c(3,4,1,2)] 
colnames(myPCAtrunc[[2]]) <- c("PC1","PC2","PC3","PC4") # fake names 
myPCAtrunc[[5]] <- myPCAtrunc[[5]][,c(3,4,1,2)] 
colnames(myPCAtrunc[[5]]) <- c("PC1","PC2","PC3","PC4") # fake names 
autoplot(myPCAtrunc, xlab = "PC3", ylab="PC4") 

Answer 1

Willkommen zu SO!

p1 <- autoplot(myPCA, colour = "red") 
p2 <- autoplot(myPCAtrunc, xlab = "PC3", ylab="PC4", colour = "blue") 
library(gridExtra) 
grid.arrange(p1, p2, ncol = 2)