r - 如何更改ggbiplot中椭圆的线型？

Question

是否可以更改 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))

Answer 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() 语句之外的大小，很难区分线条。