daten <- c(-11, -10, -9, -1, 0, 1, 9, 10, 11)

startwerte <- matrix(c(9, 10, 11), ncol = 1)

clustering <- kmeans(daten, centers = startwerte)

print(clustering)