We’ve updated our Terms of Service. A new AI Addendum clarifies how Stack Overflow utilizes AI interactions.

Return to Revisions

Haskell, 175 bytes

t=take 16
f=t0ドル:f
p s(a:b)=s%(a:a:b)
s%(a:b:c:d)=s(4*a+2*b+c):s%(b:c:d)
s%[a,b]=[s6ドル*a+b]
n=putStrLn
m s=n"P3 33 16 1">>mapM_((n"0 0">>).print)`mapM_`t(iterate(p(s!!))$f++1:f)

Try it online!

Outputs to a ppm file with blue being on and black being off. You can adjust the colors somewhat but blue is the golfiest of the primary colors.

Sample outputs

Rule 30

• Raw

  enter image description here

• Increased size

  enter image description here

Rule 121

• Raw

  enter image description here

• Increased Size

  enter image description here