cutree_1k.dendrogram function

cutree for dendrogram (by 1 k value only!)