Otrzymuj elementy indeksowane parzyste/nieparzyste z kolekcji (lista map) w Clojure

Question

Mam listę map, potrzebuję uzyskać wyrównane/nieparzyste elementy indeksowane z tej listy w Clojure. Nie chcę iterować myśli listę z pętli for. Czy istnieje jakaś mała czy pojedyncza funkcja?

Answer 1

user=> (take-nth 2 [0 1 2 3 4 5 6 7 8 9]) 
(0 2 4 6 8) 
user=> (take-nth 2 (rest [0 1 2 3 4 5 6 7 8 9])) 
(1 3 5 7 9) 

Answer 2

nie wiem jakiejkolwiek wbudowanej funkcji do tego, ale to nie jest gadatliwy napisać samemu, tu jest moja próba:

(defn evens-and-odds [coll] 
    (reduce (fn [result [k v]] 
      (update-in result [(if (even? k) :even :odd)] conj v)) 
      {:even [] :odd []} 
      (map-indexed vector coll))) 

(evens-and­-odds [ "foo"­ "bar"­ "baz"­ "foob­ar" "quux­" ]) 
; -> {:even ["foo" "baz" "quux"], :odd ["bar" "foobar"]}