clojure - 如何在 Clojure 中创建部分函数列表？

Question

我需要在 clojure 中编写这样的代码。

-- haskell
fns = map (,) [1..3]
head fns $ 1
-- => (1,1)
fns <*> [1..3]
-- => [(1,1),(1,2),(1,3),(2,1),(2,2),(2,3),(3,1),(3,2),(3,3)]

不起作用

(def fns (map (partial list) (range 1 3)))
((first fns) 1)
;; => ClassCastException java.lang.Long cannot be cast to clojure.lang.IFn

可行，但我认为这不是惯用的方式

(def fns (map (fn [x] `(partial list ~x)) (range 1 3)))
((eval (first fns)) 1)
;; => (1 1)

Answer 1

函数(部分列表)相当于函数list。它不像 haskell，所有东西都被柯里化(Currying) - 我认为你打算 partial 看到它只被赋予一个参数，list，并柯里化(Currying)自己以等待第二个参数。但实际上应该是(partialpartiallist):您正在尝试部分应用函数partial本身。

另请注意，部分应用的函数在 clojure 中并不像在 haskell 中那样常见，部分原因是它们读起来不太好。如果我想构建这样的函数列表，我可能会编写 (for [i (range 1 3) )] (fn [j] (列表 i j))).