A261299 Binary representation of the middle column of the "Rule 30" elementary cellular automaton starting with a single ON (black) cell.
1, 11, 110, 1101, 11011, 110111, 1101110, 11011100, 110111001, 1101110011, 11011100110, 110111001100, 1101110011000, 11011100110001, 110111001100010, 1101110011000101, 11011100110001011, 110111001100010110, 1101110011000101100, 11011100110001011001
Offset: 0
References
- S. Wolfram, A New Kind of Science, Wolfram Media, 2002; p. 55.
Links
- Robert Price, Table of n, a(n) for n = 0..999
- Eric Weisstein's World of Mathematics, Elementary Cellular Automaton
- Index entries for sequences related to cellular automata
- Index to Elementary Cellular Automata
Programs
-
Mathematica
A261299list[nmax_]:=With[{ca=CellularAutomaton[30,{{1},0},{nmax,{{0}}}]},Array[FromDigits[Take[ca,#]]&,nmax+1]];A261299list[25] (* Paolo Xausa, May 30 2023 *)