In general, this function will work for non-integer collections.  I
make no performance/laziness guarantees.

(defn selections-dups [coll n]
  (let [r (range (count coll))
        f #(< (last %1) (first %1))
        s (remove f (selections r n))]
    (map #(map (fn [x] (nth coll x)) %1) s)))
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To post to this group, send email to clojure@googlegroups.com
To unsubscribe from this group, send email to 
clojure+unsubscr...@googlegroups.com
For more options, visit this group at 
http://groups.google.com/group/clojure?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to