Update kmeans_iris.R

Improved R script for K-means clustering with supporting graphs