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])