Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #17 Feb 21 2016 20:13:46
%S 1,111,10101,1101011,100010001,11101110111,1010001000101,
%T 110110111011011,10000000100000001,1110000011100000111,
%U 101010001010100010101,11010110110101101101011,1000100000001000000010001
%N 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.
%C See A038184 for decimal equivalents.
%D S. Wolfram, A New Kind of Science, Wolfram Media, 2002; p. 55.
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Rule150.html">Rule 150</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/ElementaryCellularAutomaton.html">Elementary Cellular Automaton</a>
%H S. Wolfram, <a href="http://wolframscience.com/">A New Kind of Science</a>
%H <a href="https://oeis.org/wiki/Index_to_Elementary_Cellular_Automata">Index to Elementary Cellular Automata</a>
%H <a href="/index/Ce#cell">Index entries for sequences related to cellular automata</a>
%t 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 *)
%Y This sequence, A038184 and A071036 are equivalent descriptions of the Rule 150 automaton.
%Y See A071053 for number of ON cells.
%K nonn
%O 0,2
%A _Eric W. Weisstein_, Apr 13 2006 and _N. J. A. Sloane_, Jul 28 2014, combined into one entry by _N. J. A. Sloane_, Oct 20 2015