r - 自定义图例顺序 ggbiplot，建立在 ggplot2

Question

我在使用该ggbiplot()函数创建了一个 PCA 图，形成了ggbiplot构建在ggplot2. 这是一个类似的、可重现的例子：

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)