RosettaCodeData/Task/Forward-difference/Clojure/forward-difference.clj

3 lines
78 B
Clojure

(defn fwd-diff [nums order]
(nth (iterate #(map - (next %) %) nums) order))