if (FALSE) { # requireNamespace("flexclust", quietly = TRUE)
x <- exc(iris, "Species")
iris_km <- cluster(x[1:100, ], algorithm = "KMeans", verbosity = 0L)
assign_clusters(iris_km, x[101:150, ], verbosity = 0L)
}
Run the code above in your browser using DataLab