modified:   R/cluster_neurovault.R