如何从绘图中删除特定组,但在R中绘图保持不变?

如何从绘图中删除特定组,但在R中绘图保持不变?,r,plot,grouping,pca,R,Plot,Grouping,Pca,如何从绘图中删除彩色组?但绘图应保持不变。从绘图中删除一个或任意数量的组的一种方法是过滤用于图层的数据,例如,查看gg$layers显示PCA绘图由六个图层组成,但只有前两个图层中的组用作填充颜色。因此,我只是过滤了这两个层的数据,这给了我一个图,其中setosa被删除 编辑根据@DaveArmstrong的建议,我添加了他的代码,将轴的范围固定在原始范围上,并添加了原始颜色 库(FactoMineR) 图书馆(GG2) irix我认为除了上面的好答案外,OP还希望保持原始的x轴和y轴限制。您可

如何从绘图中删除彩色组?但绘图应保持不变。

从绘图中删除一个或任意数量的组的一种方法是过滤用于图层的数据,例如,查看
gg$layers
显示PCA绘图由六个图层组成,但只有前两个图层中的组用作填充颜色。因此,我只是过滤了这两个层的数据,这给了我一个图,其中
setosa
被删除

编辑根据@DaveArmstrong的建议,我添加了他的代码,将轴的范围固定在原始范围上,并添加了原始颜色

库(FactoMineR)
图书馆(GG2)

irix我认为除了上面的好答案外,OP还希望保持原始的x轴和y轴限制。您可以通过修改上述内容(在过滤数据之前必须计算x和y范围):
yrg@DaveArmstrong Hi Dave。谢谢你的建议。我已经把它添加到了我的答案中,顺便说一下,我还修改了填充颜色。最佳S。
data('iris')
pca.irix <- PCA(iris[ ,1:4])
gg <- factoextra::fviz_pca_biplot(X = pca.irix, 
                             # samples
                             fill.ind = iris$Species, col.ind = 'black',
                             pointshape = 21, pointsize = 1.5,
                             geom.ind = 'point', repel = T,
                             geom.var = FALSE )
setosa_wo <- iris %>% 
             filter(Species != 'setosa')

gg + scale_x_continuous(limits = c((-2), 2)) + scale_y_continuous(limits = c((-2), 2))