Here's an attempt, but it's not my best work. =)
(def temp [2 3 4 6 8 1])
(let [l (filter identity
(for [[a b c] (map vector temp (rest temp))]
(if (= (- b a) 1)
a
nil)))]
(concat l [(+ (last l) 1)]))
-Patrick
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to [email protected]
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
