SHOW:
|
|
- or go back to the newest paste.
| 1 | - | (println |
| 1 | + | (defn fizzbuzz [fb-count] |
| 2 | - | (clojure.string/join "\n" |
| 2 | + | |
| 3 | - | (take 18 |
| 3 | + | (clojure.string/join |
| 4 | - | (map #(str %1 %2) |
| 4 | + | (take fb-count |
| 5 | - | (cycle ["" "" "fizz"]) |
| 5 | + | (map #(str %1 %2 %3) |
| 6 | - | (cycle ["" "" "" "" "buzz"]))))) |
| 6 | + | (cycle ["" "" "fizz"]) |
| 7 | (cycle ["" "" "" "" "buzz"]) | |
| 8 | (cycle ["\n"])))))) |
