revised output R function
add distribution from Kmeans
add lines to ensure ratings in [1 to 5]