Absolvovanie oblasti na inú funkciu v clojure

0

Otázka

Ja som len začala clojure ale ja nedokážem zistiť pomocou/vytvorenie vyššieho rádu funkcie.

Mám rozdelený na zber a chcem prejsť do inej funkcie, ktoré budú robiť niečo do okna položky. Nie som si istý, ako ísť o to urobíte.

(def foo [:a :b :c :d :e])

(partition 3 1 foo)
;;=> ((:a :b :c) (:b :c :d) (:c :d :e))

(defn bar [start next end])

Myslím, že základný prehľad by byť.

(defn faz [collect]
    (partition 3 1 collect)
    ;;maybe do here before passing
    (bar stand next end)
)

Mohol by som sa dostať pred seba, ale vidím aj existujú aj iné funkcie, ako znížiť a vzťahujú sa môže robiť niečo podobné právo? Hoci väčšina príkladov, vidím, že sa to tak, že vykonávať operácie na dve položky na čas, ktoré sú podobné (partition 2 1 foo)

clojure higher-order-functions
2021-11-20 10:49:57
2

Najlepšiu odpoveď

1

Môžete urobiť niečo ako

(defn bar [start next end])


(defn faz [collect]
  (let [partitions (partition 3 1 collect)]
    (apply bar partitions)
    ))

alebo, ak chcete hovor bar priamo, môžete použiť destructuring

(defn bar [start next end])

(defn faz [collect]
  (let [partitions (partition 3 1 collect)
        [start next end] partitions]
    (bar start next end)
    ))
2021-11-20 11:08:30
0

Vaša otázka je všeobecné a existuje viac spôsobov, ako to dosiahnuť, očakávané výsledky a použité funkciu.

Ak sa chcete vrátiť postupnosť výsledky, použitie map a apply:

(defn results-for-triplets [collect]
  (map #(apply + %) (partition 3 1 collect)))

(results-for-triplets [1 2 3 4 5])
=> (6 9 12)

Pre lepšiu čitateľnosť, môžete použiť ->> makro.

(defn results-for-triplets [collect]
  (->> collect
       (partition 3 1)
       (map #(apply + %))))

(results-for-triplets [1 2 3 4 5])
=> (6 9 12)

Môžete sa vyhnúť applyak vaša funkcia destructures prešiel poradí:

(defn sum3 [[a b c]]
  (+ a b c))

(defn results-for-triplets [collect]
  (->> collect
       (partition 3 1)
       (map sum3)))

(results-for-triplets [1 2 3 4 5])
=> (6 9 12)

Ak chcete zavolať funkciu pre vedľajší účinok a potom sa vrátiť nilpoužite run!:

(defn print3 [[a b c]]
  (println a b c))

(defn results-for-triplets [collect]
  (->> collect
       (partition 3 1)
       (run! print3)))

(results-for-triplets [1 2 3 4 5])
1 2 3
2 3 4
3 4 5
=> nil
2021-11-20 11:51:18

V iných jazykoch

Táto stránka je v iných jazykoch

Русский
..................................................................................................................
Italiano
..................................................................................................................
Polski
..................................................................................................................
Română
..................................................................................................................
한국어
..................................................................................................................
हिन्दी
..................................................................................................................
Français
..................................................................................................................
Türk
..................................................................................................................
Česk
..................................................................................................................
Português
..................................................................................................................
ไทย
..................................................................................................................
中文
..................................................................................................................
Español
..................................................................................................................