【问题标题】:How can I draw those to graphs on the same one and in different colours?我怎样才能在同一张图上用不同的颜色绘制这些图?
【发布时间】:2016-04-23 10:21:55
【问题描述】:

我只需要将这些图表放在同一个图表上,并且第一个图表的点需要与第二个图表的颜色不同。我认为这很容易,但我找不到它请帮忙。谢谢

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

【问题讨论】:

    标签: r ggplot2 pca


    【解决方案1】:

    欢迎来到 SO!

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

    【讨论】:

      猜你喜欢
      • 2019-01-07
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      • 1970-01-01
      相关资源
      最近更新 更多