|
%I #14 Oct 04 2023 04:32:35
%S 0,1,2,4,4,8,8,9,9,14,15,15,17,19,18,20,20,26,26,28,28,29,29,33,35,38,
%T 40,38,35,39,45,46,41,48,55,52,48,57,57,54,57,64,61,56,62,65,69,73,65,
%U 68,73,79,76,73,79,80,76,81,83,83,86,89,90,91,86,91,97
%N Number of OFF (white) cells in the n-th iteration of the "Rule 110" elementary cellular automaton starting with a single ON (black) cell.
%D S. Wolfram, A New Kind of Science, Wolfram Media, 2002; p. 55.
%H Paolo Xausa, <a href="/A265322/b265322.txt">Table of n, a(n) for n = 0..5000</a> (terms 0..999 from Robert Price)
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/ElementaryCellularAutomaton.html">Elementary Cellular Automaton</a>
%H <a href="/index/Ce#cell">Index entries for sequences related to cellular automata</a>
%H <a href="https://oeis.org/wiki/Index_to_Elementary_Cellular_Automata">Index to Elementary Cellular Automata</a>
%t A265322list[nmax_]:=Range[1,2nmax+1,2]-Map[Total,CellularAutomaton[110,{{1},0},nmax]];A265322list[100] (* _Paolo Xausa_, Oct 04 2023 *)
%Y Cf. A075437.
%K nonn,easy
%O 0,3
%A _Robert Price_, Dec 06 2015
|
