Update SOTUS_Hclust.R