Einführung in die Anomalieerkennung in R
Alastair Rushworth
Data Scientist
plot(Width ~ Height, data = furniture)

Ausreißer liegen meist weit von ihren Nachbarn entfernt

library(FNN)
furniture_knn <- get.knn(data = furniture, k = 5)
Argumente
data: Matrix der Datenk: Anzahl der Nachbarnget.knn() liefert zwei Matrizen
names(furniture_knn)
"nn.index" "nn.dist"
Distanzmatrix
head(furniture_knn$nn.dist, 3)
[,1] [,2] [,3] [,4] [,5]
[1,] 5.128300 5.367791 5.390801 5.740713 8.477025
[2,] 4.300093 5.367791 6.159139 7.091966 7.428176
[3,] 3.047502 3.545978 4.426266 5.006570 5.654202
Durchschnittliche Distanz zu den nächsten Nachbarn
furniture_score <- rowMeans(furniture_knn$nn.dist)
Größter Score?
which.max(furniture_score)
29
Einführung in die Anomalieerkennung in R