Wolfram Language (Mathematica), 82 bytes
StringRiffle[StringJoin/@(CellularAutomaton[30,{{1},0},31]/.{1->"1",0->"."}),"\n"]
Try it online! Gotta have the OG in the house. Note the 30 in this code is precisely why this cellular automaton is called Rule 30!
Greg Martin
- 16.7k
- 4
- 23
- 73