Matrixtransposition in clojure

Question

In clojure ist eine mögliche Darstellung einer Matrix ein Vektor von Vektoren, d.h. [[1 2] [3 4]]. Eine mögliche Implementierung einer Matrix zur Umsetzung wäre:

(defn transpose [matrix] 
    (loop [matrix matrix, transp [], i 0] 
    (if (< i (count (nth matrix 0))) 
     (recur matrix 
      (conj transp 
        (vec (reduce concat 
           (map #(conj [] (nth %1 i)) 
            matrix)))) 
      (inc i)) 
     transp))) 

Kann jemand denken Sie an einen mehr idiomatische zu clojure Implementierung? um zum Beispiel zu vermeiden, dass diese schreckliche Schleife wiederkehrt?

Answer 1

Die übliche Lösung ist

(defn transpose [m] 
    (apply mapv vector m)) 

Answer 2

Ab 2014 Ich würde empfehlen, core.matrix für jede numerische Arbeit in Clojure verwenden.

unter anderem dies bietet Implementierungen von allen gängigsten Matrix-Operationen:

(use 'clojure.core.matrix) 

(transpose [[1 2] [3 4]]) 
=> [[1 3] [2 4]]