如何让 Clojure 函数接受可变数量的参数？

Question

我正在学习 Clojure，我正在尝试定义一个函数，该函数采用可变数量的参数（可变函数）并对它们进行求和（是的，就像 + 过程一样）。但是，我不知道如何实现这样的函数

我能做的就是：

(defn sum [n1, n2] (+ n1 n2))

当然这个函数需要两个参数并且只需要两个参数。请教我如何让它接受（并处理）未定义数量的参数。

Answer 1

一般来说，非交换的情况你可以使用 apply：

(defn sum [& args] (apply + args))

由于加法是可交换的，所以像这样的东西也应该起作用：

(defn sum [& args] (reduce + args))

& 导致 args 绑定到参数列表的其余部分（在本例中是整个列表，因为 & 左侧没有任何内容）代码>）。

显然这样定义 sum 是没有意义的，因为

(sum a b c d e ...)

你可以写：

(+ a b c d e ....)

Answer 2

Yehoanathan 提到了参数重载，但没有提供直接的例子。这就是他所说的：

(defn special-sum
  ([] (+ 10 10))
  ([x] (+ 10 x))
  ([x y] (+ x y)))

(special-sum) =>; 20

（特殊总和 50） => 60

（特殊总和 50 25） => 75

Answer 3

 (defn my-sum
  ([]  0)                         ; no parameter
  ([x] x)                         ; one parameter
  ([x y] (+ x y))                 ; two parameters
  ([x y & more]                   ; more than two parameters


    (reduce + (my-sum x y) more))
  )

Answer 4

defn 是一个宏，它使定义函数变得更加简单。
Clojure 支持单个函数对象中的参数重载，
使用 &

的自引用和可变数量函数

来自 http://clojure.org/function_programming

Answer 5

(defn sum [& args]
  (print "sum of" args ":" (apply + args)))

这需要任意数量的参数并将它们相加。