 (defmethod matrix-data "clinicalMatrix"
   [metadata features lines]
   (let [lines (transpose lines)]
-    (with-meta (map #(data-line features %) (rest lines))
+    (with-meta (chunked-pmap #(data-line features (tabbed %)) (rest lines))
                {:samples (rest (first lines))})))
 
 (defn- cgdata-meta [file]

  (:require [me.raynes.fs :as fs])
  (:gen-class))

(defn- normalized-path
  "Like fs/normalized-path, but doesn't add *cwd*."
  [path]
  (fs/with-cwd "/"
    (apply io/file (drop 1 (fs/split (fs/normalized-path path))))))

;
; cgData metadata


(defmethod matrix-data :default
  [metadata features lines]
  (with-meta (chunked-pmap #(data-line features (tabbed %)) (rest lines))
             {:samples (rest (first lines))}))

(defn- transpose [lines]
