 ;; Let's try casting a numeric column using this function:
 ;;
 ;;     => (with-open [in-file (io/reader "test/test.csv")]
-;;          (transduce
-;;            (comp
-;;              (remove-comments)
-;;              (mappify)
-;;              (cast-with {:this #(Integer/parseInt %)}))
-;;            conj
-;;            []
-;;            (csv/parse-csv in-file)))
+;;          (into []
+;;                (comp (remove-comments)
+;;                      (mappify)
+;;                      (cast-with {:this #(Integer/parseInt %)}))
+;;                (csv/parse-csv in-file)))
 ;;
 ;;     ({:this 1, :that "2", :more "stuff"}
 ;;      {:this 2, :that "3", :more "other yeah"})

;; Here's an example using the mappify transducers.
;;
;;     => (with-open [in-file (io/reader "test/test.csv")]
;;          (transduce
;;            (mappify)
;;            conj
;;            []
;;            (csv/parse-csv in-file))
;;
;;     [{:this "# some comment lines..."}
;;      {:this "1", :that "2", :more "stuff"}

;;
;;     => (let [data [{:this "a" :that "b"}
;;                    {:this "x" :that "y"}]]
;;          (into []
;;                (vectorize {:header [:that :this]
;;                           :prepend-header false})
;;                data))
;;     (["b" "a"]
;;      ["y" "x"])

