|
%I #35 Jun 29 2023 13:22:43
%S 1,2,2,4,2,4,4,10,2,4,4,10,4,10,10,28,2,4,4,10,4,10,10,28,4,10,10,28,
%T 10,28,28,82,2,4,4,10,4,10,10,28,4,10,10,28,10,28,28,82,4,10,10,28,10,
%U 28,28,82,10,28,28,82,28,82,82,244,2,4,4,10,4,10,10,28,4,10,10,28,10,28,28,82,4
%N Number of first-quadrant cells (including the two boundaries) born at stage n of the Holladay-Ulam cellular automaton.
%C See the main entry for this CA, A147562, for further information.
%C When I first read the Singmaster MS in 2003 I misunderstood the definition of the CA. In fact once cells are ON they stay ON. The other version, when cells can change state from ON to OFF, is described in A079317. - _N. J. A. Sloane_, Aug 05 2009
%C The pattern has 4-fold symmetry; sequence just counts cells in one quadrant.
%D D. Singmaster, On the cellular automaton of Ulam and Warburton, M500 Magazine of the Open University, #195 (December 2003), pp. 2-7.
%H Paolo Xausa, <a href="/A079314/b079314.txt">Table of n, a(n) for n = 0..10000</a>
%H David Applegate, Omar E. Pol and N. J. A. Sloane, <a href="/A000695/a000695_1.pdf">The Toothpick Sequence and Other Sequences from Cellular Automata</a>, Congressus Numerantium, Vol. 206 (2010), 157-191. [There is a typo in Theorem 6: (13) should read u(n) = 4.3^(wt(n-1)-1) for n >= 2.]
%H Omar E. Pol, <a href="http://www.polprimos.com/imagenespub/polca032.jpg">Illustration of initial terms (Overlapping squares)</a> [From _Omar E. Pol_, Nov 20 2009]
%H D. Singmaster, <a href="/A079314/a079314.pdf">On the cellular automaton of Ulam and Warburton</a>, 2003 [Cached copy, included with permission]
%H N. J. A. Sloane, <a href="/wiki/Catalog_of_Toothpick_and_CA_Sequences_in_OEIS">Catalog of Toothpick and Cellular Automata Sequences in the OEIS</a>
%H N. J. A. Sloane, <a href="http://arxiv.org/abs/1503.01168">On the Number of ON Cells in Cellular Automata</a>, arXiv:1503.01168, 2015
%F For n > 0, a(n) = 3^(A000120(n)-1) + 1.
%F For n > 0, a(n) = A147582(n)/4 + 1.
%F Partial sums give A151922. [_Omar E. Pol_, Nov 20 2009]
%e From _Omar E. Pol_, Jul 18 2009: (Start)
%e If written as a triangle:
%e 1;
%e 2;
%e 2,4;
%e 2,4,4,10;
%e 2,4,4,10,4,10,10,28;
%e 2,4,4,10,4,10,10,28,4,10,10,28,10,28,28,82;
%e 2,4,4,10,4,10,10,28,4,10,10,28,10,28,28,82,4,10,10,28,10,28,28,82,10,28;...
%e Rows converge to A151712.
%e (End)
%t A079314list[nmax_]:=Join[{1},3^(DigitCount[Range[nmax],2,1]-1)+1];A079314list[100] (* _Paolo Xausa_, Jun 29 2023 *)
%Y Cf. A147582, A079315, A079316, A079317, A079318, A079319, A151713, A139250.
%Y Cf. A151712, A151922, A160407.
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_, Feb 12 2003
%E Edited by _N. J. A. Sloane_, Aug 05 2009
|
