A118110 State of one-dimensional cellular automaton 'sigma' (Rule 150): 000,001,010,011,100,101,110,111 -> 0,1,1,0,1,0,0,1 at generation n, when started with a single ON cell, regarded as a binary number.
1, 111, 10101, 1101011, 100010001, 11101110111, 1010001000101, 110110111011011, 10000000100000001, 1110000011100000111, 101010001010100010101, 11010110110101101101011, 1000100000001000000010001
Offset: 0
Keywords
References
- S. Wolfram, A New Kind of Science, Wolfram Media, 2002; p. 55.
Links
- Eric Weisstein's World of Mathematics, Rule 150
- Eric Weisstein's World of Mathematics, Elementary Cellular Automaton
- S. Wolfram, A New Kind of Science
- Index to Elementary Cellular Automata
- Index entries for sequences related to cellular automata
Crossrefs
Programs
-
Mathematica
rule = 150; rows = 20; Table[FromDigits[Table[Take[CellularAutomaton[rule, {{1}, 0}, rows-1, {All, All}][[k]], {rows-k+1, rows+k-1}], {k, 1, rows}][[k]]], {k, 1, rows}] (* Robert Price, Feb 21 2016 *)
Comments