R异常值程序

Question

我想写一个程序来从我的数据集中删除异常值。这段代码显示了离群行和列号，但没有从我的数据集中删除它们:

library(outliers)
out <- outlier(Practice_data[,2:4], logical=TRUE)
out <- cbind(FALSE, out)
Practice_data[which(out[,], TRUE)]
which(out[,], TRUE)

那么我如何从我的数据集中删除这些异常值并将它们保存在另一个新的数据文件中呢?

Answer 1

如果要删除包含至少一个离群值的行，请尝试以下操作(离群值函数将为您识别每个维度中的离群值，它不会删除它们，您必须显式地删除它们):

library(outliers) 
out <- outlier(Practice_data[,2:4], logical=TRUE) 
indices <- which(rowSums(out) > 0)
Practice_data <- Practice_data[-indices, ]