takes a sequence of rows of clojure data and a sequence of fns (keys for example) that produce the columns, and generates an org table

clj->org.clj

(defn clj->org
  [data-rows col-fns]
  (doseq [line (map (apply juxt col-fns) data-rows)]
    (println (str "|" (clojure.string/join "|" line) "|"))))

;; edit: use print-table, and support col headers
;; I never realized print-table is an org-table!!

(defn clj->org
  [data-rows col-fns & [headers]]
  (clojure.pprint/print-table
    (let [headers' (or headers (map (fn [f] (if (keyword? f) f (name (gensym))))
                                 col-fns))]
      (map
        (comp
          #(apply hash-map (interleave headers' %))
          (apply juxt col-fns))
        data-rows))))

;; edit: actually, with print-table we'd be better off just updating
;;       the maps and before feeding them to print-table and then you'd have 
;;       sensible column names for the calculated columns too

(->> rows (map #(assoc % :foo (my-fn (:bar %) (:baz %)))) print-table)

;; good to know that print-table is an org table