Stacking the iterations is fun too!
(clear)
(backfacecull 0)
(hint-none)
(hint-wire)
(scale 3)
(for ((x (in-range 0 4)))
(let ((col (vector 0 0 0)))
(vector-set! col x 1)
(with-primitive (build-icosphere (+ x 1))
(line-width (- 6 x))
(wire-colour col))))
