I find i -&gt; i % 2 == 0), still less readable than even?.<p>But let&#x27;s step up the game a bit.
Let&#x27;s produce a sequence of the form [true false false true true true false false false false ...] of exact length 1000.<p><pre><code>  (take 1000 (mapcat (fn [i] (repeat i (odd? i))) (range)))</code></pre>