GDG Jihlava talk - fizzbuzz demo

jihlava.clj

(ns gdg-jihlava)
;1, 2, Fizz, 4, Buzz, Fizz, 7, 8, Fizz, Buzz, 11, Fizz, 13, 14, Fizz Buzz

(defn fizz-buzz-number [number]
  (cond
   (= 0 (mod number 3) (mod number 5)) :fizz/buzz
   (= 0 (mod number 3)) :fizz
   (= 0 (mod number 5)) :buzz
   :else number))

(defn fizzbuzz [n]
  (map fizz-buzz-number (range 1 (inc n))))

(fizzbuzz 15)