如何更改ggbiplot中椭圆的线型？答案

【问题标题】：How to change the line type of ellipses in ggbiplot?如何更改ggbiplot中椭圆的线型？
【发布时间】：2016-02-29 20:43:19
【问题描述】：

是否可以在 ggbiplot 中更改正态概率椭球的线类型，例如他们有虚线和点线而不是不同的颜色吗？除了用作 MWE 之外，我在 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))

【问题讨论】：

标签： r ggplot2 pca ellipse ggbiplot

【解决方案1】：

据我所知，传递给 ggbiplot 的任何参数或参数都不可能。幸运的是，ggbiplot 是一些 ggplot2 命令和数据按摩的非常简单的包装器。您可以复制源代码制作自定义函数并将原始源代码的第 124 行更改为：

g <- g + geom_path(data = ell, aes(color = groups, group = groups))

到：

g <- g + geom_path(data = ell, aes(color = groups, group = groups, linetype = groups))

由于绘图比例，如果不更改 aes() 语句之外的大小，很难区分线条。

【讨论】：

当我使用自定义颜色时，只有一个小问题变得明显。例如group.colors <- c(barolo = "#c4019a", grignolino = "#9ac401", barbera ="#019ac4") 然后g <- ggbiplotmod(wine.pca, obs.scale = 1, var.scale = 1, groups = wine.class, ellipse = TRUE, circle = TRUE) + scale_colour_manual(values=group.colors, name = '') print(g) 导致在图例右侧打印两组组。一个以黑色和白色的三组为特色，线条类型不同，另外三组在下面，只是颜色不同。
ggplot2 图例很棒，除非它们不是……至少这是我的经验。我的传奇故事看起来并不完全是我想要的样子，而且它总是有点像得到我想要的东西的旅程。我做的不够频繁，通常不得不四处搜索，以找出如何具体做我想做的事。这可能对您的情况有所帮助stackoverflow.com/questions/12410908/…。您可能需要再次在函数内部进行更改。