(defun fastk-main (inputfile outputfile fastmap-dimensions-requested clusters-sought)
  "takes in the parameters and spits out gnuplot-able files"
  (let* ((fastmatrix (fastmap fastmap-dimensions-requested
                            (make-usable (load-item inputfile))))
         (kmatrix (k-means clusters-sought fastmatrix)))
    (make-plottable-initial outputfile
                            fastmap-dimensions-requested clusters-sought)
    (make-plottable fastmatrix outputfile)
    (make-plottable-clusters (quicksort-array kmatrix
                              (- (array-dimension kmatrix 1) 1))
                             outputfile)))