自定义图例顺序ggbiplot，基于ggplot2构建

Question

我在使用ggbiplot()函数中创建了一个PCA图，形成了构建在ggplot2之上的ggbiplot包。下面是一个类似的、可重复使用的示例：

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

​

到目前一切尚好。我想把图例的顺序改为grginolino，barbera，barolo (而不是现在的barolo，grignolino，barbera )。名称存储在环境因子变量wine.class中。

对于这样一个简单的问题，我很抱歉，但我无法从ggplot2帮助中找到概括到这种情况的直接答案。

Answer 1

您需要对wine.class级别进行重新排序；如下所示：

library(ggbiplot)

data(wine, package = "ggbiplot")
wine.pca <- prcomp(wine, scale. = TRUE)
wine.class.reorder <-  factor(wine.class, levels = c("grignolino", "barbera", "barolo"))

ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class.reorder, 
                   ellipse = TRUE, circle = TRUE)

​

​