corrected a bug in the hclust script