有没有更灵活的方式来写这段代码呢？

Question

我一直在学习Clojure，由于我来自Ruby，在此之前的Java背景下，我在过程化思考方面遇到了困难。

有没有一种更“lispy”的方式来写这段代码，或者这样可以吗？

(defn foo
  ([s t]
     (let [x (+ 4 (- t s))]
       (if (> 2 (if (> 6 x)
                  x
                  6)
              x)
         x
         2))))

Answer 1

在clojure中，与任何其他语言一样，只要适用，通常最好使用内置函数。因此，由于clojure有一个min和一个max函数，因此您可以将您的if替换为：

(max 2 (min 6 x))

如果这些函数不存在于clojure的标准库中，我会建议您定义它们，因为将min和max的逻辑放在它们自己的函数中会产生比将它们都放在foo函数中要好得多的代码。