mapcat mit Karte und concat

Question

Um eine bessere mapcat zu verstehen, habe ich ein Beispiel:

user> (mapcat #(list % %) [1 2 3]) 
(1 1 2 2 3 3) 

und versuchte zu reproduzieren, was der Doc mit beschreibt, absichtlich, Karte und concat:

user> (doc mapcat) 
clojure.core/mapcat 
([f & colls]) 
    Returns the result of applying concat to the result of applying map 
    to f and colls. Thus function f should return a collection. 

Damit verfolgt:

user> (concat (map #(list % %) [1 2 3])) 
((1 1) (2 2) (3 3)) 

Wie Sie jedoch sehen können, funktioniert es nicht. Ich kann jedoch wie diese reduzieren verwenden, wissen aber nicht, ob es richtig ist:

user> (reduce #(concat %1 %2) (map #(vec (list % %)) [1 2 3])) 
(1 1 2 2 3 3) 

Die oben genannten Arbeiten, aber ich weiß nicht, ob es eine richtige Art und Weise ist neu zu erstellen, mit Karte und concat, was mapcat tut.

Grundsätzlich würde ich gerne von mapcat funktioniert unter der Haube.

Was passiert und wie kann ich auf die Quelle mapcat zugreifen? (Ich verwende Emacs + nrepl)

Answer 1

user=> (source mapcat) 
(defn mapcat 
    "Returns the result of applying concat to the result of applying map 
    to f and colls. Thus function f should return a collection." 
    {:added "1.0"} 
    [f & colls] 
    (apply concat (apply map f colls))) 
nil 
user=> 

Der Grund reduce funktioniert auch, weil es effektiv ist:

(concat (concat '(1 1) '(2 2)) '(3 3)) 

apply, wie im Quellcode verwendet, erweitert um:

(concat '(1 1) '(2 2) '(3 3)) 

In Ihrem ersten Versuch mit concat:

user=> (map #(list % %) [1 2 3]) 
    ((1 1) (2 2) (3 3)) 
    user=> (concat (list '(1 1) '(2 2) '(3 3))) 
    ((1 1) (2 2) (3 3)) 
    user=> (concat [1]) 
    (1) 

Sie können sehen, dass wenn Sie concat mit einem einzigen Argument aufrufen, es dieses Argument zurückgibt.

Answer 2

concat ist eine variadische Funktion, d. H. Sie kann n Parameter annehmen, wobei jeder Parameter eine Folge von Werten ist, d. H. Die Signatur wird (defn concat [& lst]]). Während Sie in Ihrem Beispiel concat mit einem einzigen Argument aufrufen, vorausgesetzt, concat nimmt eine Seq von Seq von Werten auf, die verkettet werden sollen, und deshalb erhalten Sie das Ergebnis, d. H. Die gleiche Liste der Liste wird zurückgegeben.

(apply concat(apply map #(list % %) [1 2])) wird nicht funktionieren.

(apply map #(list % %) [[1 2]]) oder (apply map #(list % %) [1 2] []) wird funktionieren.

Dies liegt daran, dass apply erwartet, dass der letzte Parameter eine Folge von Werten ist und jedes Element in dieser Sequenz von Werten als Parameter an die angewendete Funktion übergeben wird. In dem Fall, dass der Antrag nicht erfolgreich war, wird der Anruf auf (map #(list % %) 1 2) erweitert, was falsch ist, und die Fehlermeldung zeigt auch, dass er nicht lange als Sequenz in Sequenzsequenzen als Parameter konvertieren kann.