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 A050058 #10 Sep 08 2015 08:53:21 %S A050058 1,3,1,2,5,6,9,10,12,13,16,17,19,24,30,39,49,50,53,54,56,61,67,76,86, %T A050058 98,111,127,144,163,187,217,256,257,260,261,263,268,274,283,293,305, %U A050058 318,334,351,370,394,424 %N A050058 a(n) = a(n-1)+a(m), where m=n-1-2^p and 2^p<n-1<=2^(p+1), for n >= 4. %H A050058 Ivan Neretin, <a href="/A050058/b050058.txt">Table of n, a(n) for n = 1..8193</a> %t A050058 Fold[Append[#1, #1[[-1]] + #1[[#2]]] &, {1, 3, 1}, Flatten@Table[k, {n, 5}, {k, 2^n}]] (* _Ivan Neretin_, Sep 08 2015 *) %Y A050058 Cf. similar sequences, with different initial conditions, listed in A050034. %K A050058 nonn %O A050058 1,2 %A A050058 _Clark Kimberling_