在ggbiplot中更改图例标题

Question

我无法操纵ggbiplot，以便我可以指定图例的标题。使用包数据：

library(ggbiplot)
data(wine)
wine.pca <- prcomp(wine, scale. = TRUE)
p <- ggbiplot(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class, 
              ellipse =  TRUE, circle = TRUE)

我已尝试过以下

p + scale_fill_discrete(name="New Title")
p + guides(fill=guide_legend(title="New Legend Title"))

但我也没有运气。我想知道是否有人熟悉这个软件包并且能够就如何更改图例标题提出建议。

Answer 1

当您绘制点并且它们的美学是颜色时，您应该使用color=而不是fill=

p+guides(color=guide_legend("Legend title"))

或

p + labs(color="Legend title")

Answer 2

与此同时，它适用于scale_color_discrete(name = 'Legend title')。