我想定义一个在juxt中使用的函数列表,但是我在实现它时遇到了麻烦。

这是我想要的示例:

(defn sin [n] (Math/sin n))
(defn cos [n] (Math/cos n))
((juxt sin cos) 4)
>> [-0.7568024953079282 -0.6536436208636119]

现在,与其说((juxt sin cos) 4),不如说((juxt trig) 4)(def trig [sin cos])。我尝试了((apply juxt trig) 4)和其他一些东西,但似乎没有任何反应。谢谢!

最佳答案

apply似乎可以正常工作:

user=> ((juxt sin cos) 4)
[-0.7568024953079282 -0.6536436208636119]
user=> ((apply juxt trig) 4)
[-0.7568024953079282 -0.6536436208636119]

09-11 02:21