Runs the computation found in http://www.stat.columbia.edu/~madigan/DM08/descriptive.ppt.pdf
ComputeHartigan(FitActualWSS, FitPlus1WSS, nrow)
The computed Hartigan Number
the WSS from a kmeans fit
the WSS from a kmeans fit
the number of rows in the original dataset
Jared P. Lander www.jaredlander.com
Not exported, only used by FitKMeans
http://www.stat.columbia.edu/~madigan/DM08/descriptive.ppt.pdf
kmeans
FitKMeans
data(iris)
hartiganResults <- FitKMeans(iris[, -ncol(iris)])
PlotHartigan(hartiganResults)
Run the code above in your browser using DataLab