dbyrne
dbyrne

Reputation: 61101

Performance Problem with Clojure Array

This piece of code is very slow. Execution from the slime-repl on my netbook takes a couple minutes.

(def test-array (make-array Integer/TYPE 400 400 3))

(doseq [x (range 400), y (range 400), z (range 3)]
   (aset test-array x y z 0))

Conversely, this code runs really fast:

(def max-one (apply max (map (fn [w] (apply max (map #(first %) w))) test-array)))
(def max-two (apply max (map (fn [w] (apply max (map #(second %) w))) test-array)))
(def max-three (apply max (map (fn [w] (apply max (map #(last %) w))) test-array)))

Does this have something to do with chunked sequences? Is my first example just written wrong?

Upvotes: 5

Views: 356

Answers (2)

Mars
Mars

Reputation: 8854

You might get better performance from one of the four Clojure matrix implementations available via a single interface core.matrix: at clojars, at github.

Upvotes: 0

dnolen
dnolen

Reputation: 18556

You're hitting Java reflection. This blog post has a workaround:

http://clj-me.cgrand.net/2009/10/15/multidim-arrays/

Upvotes: 7

Related Questions