 
 
 (def large-conv-update-graph
-  (merge med-conv-update-graph2
+  (merge small-conv-update-graph
     {:pca (plmb/fnk [conv mat opts']
             (let [n-ptpts (matrix/dimension-count mat 0)
                   sample-size (sample-size n-ptpts)]

        n-ptpts (count (distinct (into ptpts (map :pid votes))))]
    ; dispatch to the appropriate function
    ((cond
;       (< n-ptpts 100)   small-conv-update
;       (< n-ptpts 1000)  med-conv-update
      (< n-ptpts 1500)  med-conv-update2
       :else             large-conv-update)
          {:conv conv :votes votes :opts opts})))



                          :pca-iters 10
                          :base-iters 10
                          :base-k 50
                          :group-iters 10}
                    opts))
   :rating-mat  (plmb/fnk [conv votes]
                  (update-nmat (:rating-mat conv)
