user=> (max-key count "asd" "bsd" "dsd" "long word") "long word"
Returns the greatest of the nums.
(defn max-key "Returns the x for which (k x), a number, is greatest." {:added "1.0"} ([k x] x) ([k x y] (if (> (k x) (k y)) x y)) ([k x y & more] (reduce #(max-key k %1 %2) (max-key k x y) more)))
Comments top
No comments for max-key. Log in to add a comment.