update KMeans and as.data.frame
deleted unused files