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 A071122 #5 Oct 15 2013 22:31:20 %S A071122 2,6,14,21,26,36,47,60,68,75,89,108,128,150,176,201,215,234,263,294, %T A071122 320,345,386,423,452,492,527,570,611,648,695,753,815,876,935,999,1055, %U A071122 1122,1193,1254,1304,1350,1406,1464,1526,1596,1664,1737,1802,1878,1958 %N A071122 a(n) = a(n-1) + sum of decimal digits of 2^n. %t A071122 s=0; Do[s=s+Apply[Plus, IntegerDigits[2^n]]; Print[s], {n, 1, 128}] %Y A071122 Cf. A037123, A000788, A051351, A071317, A071121. %K A071122 base,easy,nonn %O A071122 1,1 %A A071122 _Labos Elemer_, May 27 2002