This site is supported by donations to The OEIS Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A151571 a(0)=1, a(1)=2; a(2^i + j) = a(j) + a(j+1) for 0 <= j < 2^i. 16

%I

%S 1,2,3,5,3,5,8,8,3,5,8,8,8,13,16,11,3,5,8,8,8,13,16,11,8,13,16,16,21,

%T 29,27,14,3,5,8,8,8,13,16,11,8,13,16,16,21,29,27,14,8,13,16,16,21,29,

%U 27,19,21,29,32,37,50,56,41,17,3,5,8,8,8,13,16,11,8,13,16,16,21,29,27,14,8,13

%N a(0)=1, a(1)=2; a(2^i + j) = a(j) + a(j+1) for 0 <= j < 2^i.

%C Equals 2*A118977 + A151702.

%H Ivan Neretin, <a href="/A151571/b151571.txt">Table of n, a(n) for n = 0..8191</a>

%H David Applegate, Omar E. Pol and N. J. A. Sloane, <a href="http://neilsloane.com/doc/tooth.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 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>

%t a = {1, 2}; Do[AppendTo[a, a[[j]] + a[[j + 1]]], {i, 6}, {j, 2^i}]; a (* _Ivan Neretin_, Jun 28 2017 *)

%Y For the recurrence a(2^i+j) = C*a(j) + D*a(j+1), a(0) = A, a(1) = B for following values of (A B C D) see: (0 1 1 1) A118977, (1 0 1 1) A151702, (1 1 1 1) A151570, (1 2 1 1) A151571, (0 1 1 2) A151572, (1 0 1 2) A151703, (1 1 1 2) A151573, (1 2 1 2) A151574, (0 1 2 1) A160552, (1 0 2 1) A151704, (1 1 2 1) A151568, (1 2 2 1) A151569, (0 1 2 2) A151705, (1 0 2 2) A151706, (1 1 2 2) A151707, (1 2 2 2) A151708.

%K nonn

%O 0,2

%A _N. J. A. Sloane_, May 25 2009

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified November 20 13:03 EST 2019. Contains 329336 sequences. (Running on oeis4.)