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 A050050 #15 Sep 08 2015 08:13:56 %S A050050 1,2,3,4,6,7,9,12,16,17,19,22,26,32,39,48,60,61,63,66,70,76,83,92,104, %T A050050 120,137,156,178,204,236,275,323,324,326,329,333,339,346,355,367,383, %U A050050 400,419,441,467,499,538 %N A050050 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 A050050 Ivan Neretin, <a href="/A050050/b050050.txt">Table of n, a(n) for n = 1..8193</a> %t A050050 Fold[Append[#1, #1[[-1]] + #1[[#2]]] &, {1, 2, 3}, Flatten@Table[k, {n, 5}, {k, 2^n}]] (* _Ivan Neretin_, Sep 08 2015 *) %Y A050050 Cf. similar sequences with different initial conditions: A050026 (1,1,1), A050030 (1,1,2), A050034 (1,1,3), A050038 (1,1,4), A050042 (1,2,1), A050046 (1,2,2), A050054 (1,2,4), A050058 (1,3,1), A050062 (1,3,2), A050066 (1,3,3), A050070 (1,3,4). %K A050050 nonn %O A050050 1,2 %A A050050 _Clark Kimberling_