 
 
 (def small-conv-update-graph
+  "For computing small conversation updates (those without need for base clustering)"
   (merge base-conv-update-graph
     {:mat   (plmb/fnk [rating-mat]
-              "swap nils for zeros"
+              "swap nils for zeros - most things need the 0s, but repness needs the nils"
               (map (fn [row] (map #(if (nil? %) 0 %) row))
                 (:matrix rating-mat)))
      :pca   (plmb/fnk [conv mat opts']



(def base-conv-update-graph
  {:opts'       (plmb/fnk [opts]
                  "Merge in opts with the following defaults"
                  (merge opts {:n-comps 2
                               :pca-iters 10
                               :cluster-iters 10
                               :base-k 100
                               :group-k 3}))
   :rating-mat  (plmb/fnk [conv votes]
                  (update-nmat (:rating-mat conv)

              (kmeans (assoc rating-mat :matrix mat :cols (map #(str "pc" %) (:n-comps opts')))
                (:group-k opts')
                :last-clusters (:group-clusters conv)
                :cluster-iters (:group-iters opts')))
     :repness
            (plmb/fnk [rating-mat group-clusters]
              (conv-repness rating-mat group-clusters))}))


(def med-conv-update-graph1
  "For computing small conversation updates (those with need of base clustering)"
  (merge small-conv-update-graph
    {:base-clusters
            (plmb/fnk [conv rating-mat mat opts']
              (kmeans (assoc rating-mat :matrix mat)
                (:base-k opts')
                :last-clusters (:base-clusters conv)
                :cluster-iters (:base-iters opts')))
     :proj  (plmb/fnk [base-clusters pca]
              (pca-project (map :center base-clusters) pca))
     :group-clusters
            (plmb/fnk [conv rating-mat proj opts']
              (kmeans (assoc rating-mat :matrix proj)
                (:grop-k opts')
                :last-clusters (:group-clusters conv)
                :cluster-iters (:group-iters opts')))}))


(defn partial-pca
