Идиоматический способ перебрать массив в Clojure

Question

Я новичок в clojure, и некоторые из них, как я нахожу простые манипуляции с массивами, которые легко выполнять в python, слишком сложно сделать в clojure. Например, что такое идиоматический способ сделать это в clojure?

for i = 1 to len(arr)-1: 
    sum[i] = arr[i-1] + i 

Answer 1

Clojure имеет хороший набор функций sequence manipulation, которые часто полезны для этих общих задач. этот пример будет (map-indexed + arr)

user> (def arr [1 2 38 2 3 9 4 2]) 
#'user/arr 
user> (map-indexed + arr) 
(1 3 40 5 7 14 10 9) 

хотя это только из-за конкретный пример, который вы выбрали. Более общий ответ - использовать map, mapv, reduce, или reductions или for для такого рода вещей. Например:

user> (for [i (range 0 (count arr))] (+ i (arr i))) 
(1 3 40 5 7 14 10 9) 

Answer 2

Для начала давайте сделаем @ArthurUlfeldt's example в Python.

arr = [1, 2, 38, 2, 3, 9, 4, 2] 

и, скажем

sum = [None, None, None, None, None, None, None, None] 

Выполнение (исправленное/обновляется?) Python

for i in range(1, len(arr)): 
    sum[i] = arr[i-1] + i 

... дает нам

sum 
;[None, 2, 4, 41, 6, 8, 15, 11] 

Чтобы преобразовать это в Clojure , вытесните индекс Python на 1, давая

for i in range(len(arr) - 1): 
    sum[i+1] = arr[i] + (i+1) 

Теперь мы можем построить правую как

(map + (butlast arr) (iterate inc 1)) 
;(2 4 41 6 8 15 11) 

... который мы преобразовать в вектор, начиная с индекса 1:

(vec (cons nil (map + (butlast arr) (iterate inc 1)))) 
;[nil 2 4 41 6 8 15 11] 

Вероятно, мы хотим свяжите это значение в a let:

(let [sum (vec (cons nil (map + (butlast arr) (iterate inc 1))))] 
    #_(... use `sum` here))