删除R包ggfortify/ggplot2生成的图中的特定点

Question

其目的是删除由ggfortify和ggplot2生成的图形中的特定点。

让我们使用ggfortify包中著名的iris数据集：

library(ggfortify)
library(ggplot2)
df <- iris[c(1, 2, 3, 4)]
autoplot(prcomp(df))
autoplot(prcomp(df), data = iris, colour = 'Species', shape = FALSE, label.size = 3, frame=T)

​

​

如何从图中删除数字23、14和52？

Answer 1

library(ggfortify)
library(ggplot2)
df <- iris[c(1, 2, 3, 4, 5)]
df <- df[-c(14,23,52),]
df2<-df[c(1,2,3,4)]
autoplot(prcomp(df2))
autoplot(prcomp(df2), data = df,
    colour = 'Species', shape = FALSE, label.size = 3, frame=T)

​

​

Answer 2

看起来这些数字基本上就是行号。如果是这样的话，您可以创建另一个表，其中只包含您想要的行，并执行其他相同的操作：

iris2 = iris[-c(14,23,52),]

然后，只需在当前使用iris的代码中的任何位置插入替换iris2即可