RosettaCodeData/Task/FizzBuzz/Clojure/fizzbuzz-16.clj

7 lines
165 B
Clojure
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(take 100
(->>
(map str (cycle [nil nil "Fizz"]) (cycle [nil nil nil nil "Buzz"]))
(map-indexed #(if (empty? %2) (inc %1) %2))
)
)