普通代码
创建传感器我怎么会从以下普通代码,其中combo
是clojure.math.combinatorics
别名创建一个转换器:普通代码
(defn row->evenly-divided [xs] (->> (combo/combinations (sort-by - xs) 2)
(some (fn [[big small]]
(assert (>= big small))
(let [res (/ big small)]
(when (int? res)
res))))))
正如评论指出的换能器只适用于处理每个项目。有了这一点,我已经通过改变排序使代码变得更加友好,因此现在每个项目都已经完成了。然而,我不认为有什么可以做的关于组合部分!
(defn row->evenly-divided [xs] (->> (combo/combinations xs 2)
(some (fn [xy]
(let [res (apply/(sort-by - xy))]
(when (int? res)
res))))))
回答:
这是相同的功能,但具有引入的传感器:
(def x-row->evenly-divided (comp (map (partial sort-by -))
(map (partial apply /))
(filter int?)))
(defn row->evenly-divided-2 [xs]
(->> (combo/combinations xs 2)
(sequence x-row->evenly-divided)
first))
以上是 普通代码 的全部内容, 来源链接: utcz.com/qa/259674.html