验证中...
本周日【珠海源创会】一起聊聊:PingCAP分布式事务、支付宝移动端实践、GSBN技术框架选型,点此报名占座
语言: Clojure
最后更新于 2017-07-27 18:41
countWord.clj
原始数据 复制代码
;/**
; * 输入:1a2b1c1d1a
; * 输出:aaabbcda
; * @param str
; */
(defn decryptWord [s]
(apply str (flatten (map #(repeat % %2)
(map #(java.lang.Integer/parseInt %) (clojure.string/split s #"\D"))
(filter #(not (clojure.string/blank? %)) (clojure.string/split s #"\d")))))
)
;/**
; * 输入:aaabbcda
; * 输出:3a2b1c1d1a
; * @param str
; */
(defn countWord [s]
(->> s
(partition-by identity)
(map #(str (count %) (first %)))
(apply str)
)
)

评论列表( 0 )

你可以在登录后,发表评论

搜索帮助

12_float_left_people 12_float_left_close