如何在clojure中按比例产生一个惰性序列

如何在clojure中按比例产生一个惰性序列