This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A151707 #11 Feb 24 2021 02:48:18 %S A151707 1,1,4,10,4,10,28,28,4,10,28,28,28,76,112,64,4,10,28,28,28,76,112,64, %T A151707 28,76,112,112,208,376,352,136,4,10,28,28,28,76,112,64,28,76,112,112, %U A151707 208,376,352,136,28,76,112,112,208,376,352,184,208,376,448,640,1168,1456,976,280 %N A151707 a(0)=1, a(1)=1; a(2^i+j) = 2*a(j) + 2*a(j+1) for 0 <= j < 2^i. %C A151707 Equals A151705 + A151706. %H A151707 Ivan Neretin, <a href="/A151707/b151707.txt">Table of n, a(n) for n = 0..8191</a> %H A151707 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 A151707 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> %p A151707 See A151702 for Maple code. %t A151707 a = {1, 1}; Do[AppendTo[a, 2 a[[j]] + 2 a[[j + 1]]], {i, 6}, {j, 2^i}]; a (* _Ivan Neretin_, Jul 04 2017 *) %Y A151707 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 A151707 nonn %O A151707 0,3 %A A151707 _N. J. A. Sloane_, Jun 06 2009