欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页

clj 编写一个函数 third-min 求出 倒数第三小的数给你一个非空向量,返回此向量数组中 倒数第三小的数 。如果不存在,则返回数组中最小的数。

程序员文章站 2024-03-15 22:48:12
...
(defn third-min [coll]
  (if (< (count coll) 3)
    (apply min coll)
(->> (map str coll)
     (map #(re-seq #"[0-9]+" %))
     (remove nil?)
     flatten
     (map #(Integer/parseInt %))
     sort
     (drop 2)
     first
     )))

(third-min ["zm" "12" 3 2 1 5 8])

相关标签: clojure clojure