Как я могу нарисовать их на графиках одного и того же цвета и разных цветов?

Question

Мне просто нужно поставить эти графики на один и тот же, и точки первого должны быть другого цвета, чем второй. Я думаю, что это что-то очень легко, но я не могу найти это, пожалуйста, помогите. Спасибо

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

Добро пожаловать на ТАК!

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