K-means R Prototype.