R Ausreißer-Programm

Question

Ich möchte ein Programm zum Entfernen der Ausreißer aus meinem Datensatz schreiben. Dieser Code zeigt die Ausreißer Zeilen und Spaltennummer, aber es löscht sie nicht aus meinem Datensatz:

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

Also, wie kann ich diesen Ausreißer lösche von meinem Datensatz und sie in einer anderen neuen Datendatei speichern?

Answer 1

Wenn Sie die Zeilen entfernen möchten, die mindestens einen Ausreißer enthalten, versuchen Sie Folgendes (die Ausreißerfunktion identifiziert die Ausreißer in jeder Dimension für Sie, sie werden nicht entfernt, Sie müssen sie explizit entfernen):

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