OFFSET
0,1
COMMENTS
Sequence suggested by Omar E. Pol.
Note that all values in this sequence are odd and that a(n) is approximately 2*a(n-1).
REFERENCES
D. Applegate, O. E. Pol and N. J. A. Sloane, The toothpick sequence and other sequences from cellular automata, Congressus Numerantium, v. 206 (2010) 157-191.
LINKS
D. Applegate, O. E. Pol and N. J. A. Sloane, The toothpick sequence and other sequences from cellular automata; also available at arXiv:1004.3036v2, [math.CO], 2010.
Steven R. Finch, Toothpicks and Live Cells, July 21, 2015. [Cached copy, with permission of the author]
N. J. A. Sloane, Catalog of Toothpick and Cellular Automata Sequences in the OEIS
MATHEMATICA
T = 1; t[0] = 0; t[1] = 1; lst = {1};
Do[twon = 2^n; Tmin = 1; imin = 1;
Do[If[i==twon, t[i]=twon,
t[i]=2*t[i-twon]+t[i-twon+1];
If[OddQ[i], T=T+t[i];
Ttest=T/(i*i)];
If[Ttest<Tmin, Tmin=Ttest; imin=i ]],
{i, twon, 2*twon - 1}];
AppendTo[lst, imin],
{n, 1, 15}];
lst
N[Tmin, 10]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Price, Sep 05 2015
STATUS
approved