Julien Chastang
Julien Chastang

Reputation: 17774

How do I create a primitive two-dimensional (2d) array of doubles in Clojure?

A Java API I am Clojure interoping with requires that I pass it a 2d array of doubles; double[][]. How do I create a primitive 2d array of doubles in Clojure? I am looking for something like this

(double-array-2d [[1 2] [3 4]])

This function would have a Java return type of double[][].

Upvotes: 21

Views: 3061

Answers (2)

fogus
fogus

Reputation: 6236

Try this:

(into-array (map double-array [[1 2] [3 4]]))

Upvotes: 27

Brian Carper
Brian Carper

Reputation: 72926

Try this:

(defn double-array-2d [coll]
  (let [w (count coll)
        h (apply max (map count coll))
        arr (make-array Double/TYPE w h)]
    (doseq [x (range w)
            y (range h)]
      (aset arr x y (double (get-in coll [x y]))))
    arr))

Upvotes: 3

Related Questions