clojure dla pętli, przechowuj wartości w zbiorze lub mapie

Question

Ten od jakiegoś czasu mnie dręczy, Jak przechowywać wartość w zbiorze lub mapie w pętli for?

(let [s #{}] 
    (for [ i (range 10) 
      j (range 10) ] 
     (into s [i j]))) 

wiem, że to nie będzie działać, ale chcę mieć funkcjonalność podobną do tego, gdzie zestaw będzie zawierał wreszcie [0 0] [0 1] ... [0 9] [1 0] .. . [9 9]

Dzięki

Answer 1

Jeśli dobrze rozumiem Twoje pytanie trzeba włączyć swoją ekspresję inside-out:

(let [s #{}] 
    (into s (for [i (range 10) 
       j (range 10)] 
      [i j]))) 

Rzecz zrealizować tutaj jest że for zwraca wartość (leniwą sekwencję) w przeciwieństwie do pętli for w bardziej niezbędnych językach, takich jak Java i C.

Answer 2

clojure ma kilka wielkich systemów zarządzania stan zmienny. w tym przypadku może chcesz atom zawierający zestaw

Twoje inne opcje:

• się ref jeśli więcej niż jedna zmiana musi wykonany (Coordinated wiele wątków)
• var jeśli będzie to pojedynczy gwintowany (a var może działać tak samo dobrze jak tu atomu)
• agent jeśli chcieli ustawić wartość s asynchronicznie

oczywiście for zwraca sekwencję już więc może po prostu chcesz

(into #{} (for [ i (range 10) 
        j (range 10) ] 
      [i j])) 

Answer 3

Czy tego chcesz?

(into #{} (for [i (range 10) j (range 10)] 
    [i j])) 
;-> #{[2 1] [3 2] [4 3] [5 4] [6 5] [7 6] [8 7] [9 8] [1 0] 
;  [2 2] [3 3] [4 4] [5 5] [6 6]... 

A jeśli chcesz po prostu listę jako zestaw:

(set (for [i (range 10) j (range 10)] 
    [i j]))  

Będziesz skończyć z zestawem par.

Answer 4

Ogólnie gdy chcesz powrócić zestawu lub mapę lub inne „” pojedynczą wartość, która nie jest nast od „powtarzająca się” uogólnionego działania na nast korzystając reduce jest bardziej idiomatyczne/prostolinijny niż loop/recur, i for zawsze zwraca seq (nie zbiór lub mapę).

(reduce conj #{} (for [i (range 10) j (range 10)] [i j])) 

uwaga, że ​​(dla ..) tutaj jest używana tylko do produkcji nast zawierającą wszystkie wartości skompilować do pojedynczego wyniku ustawiony. Lub na przykład:

(reduce + 0 (range 100)) 
=> 4950 

Answer 5

Myślę, że w tym scenariuszu można również użyć przejściowej struktury danych.

(let [s (transient #{})] 
(for [ i (range 10) 
     j (range 10) ] 
    (assoc! s i j))) 
(persistent! s) 

Tylko próbka kodu, nie testowana.