Simple kmeans++ in Clojure