powered by
ComputeHartigan(FitActualWSS, FitPlus1WSS, nrow)
FitKMeans
kmeans
data(iris) hartiganResults <- FitKMeans(iris[, -ncol(iris)]) PlotHartigan(hartiganResults)
Run the code above in your browser using DataLab