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 A176718 #4 Apr 02 2014 15:42:29
%S A176718 1,2,4,8,16,32,55,83,121,170,232,302,379,470,571,674,781,896,1018,
%T A176718 1145,1282,1430,1591,1760,1945,2144,2362,2591,2833,3083,3340,3611,
%U A176718 3892,4184,4489,4802,5122,5447,5782,6128,6487,6863,7255,7661,8077,8504,8944,9392
%N A176718 Partial sums of A004207.
%C A176718 Partial sums of a(1) = 1, a(n) = sum of digits of all previous terms. The subsequence of primes in this sequence begins: 2, 83, 379, 571, 2591, 2833, 3083, 6863, 10831. The subsequence of squares in this sequence begins: 1, 4, 16, 121, 4489.
%F A176718 a(n) = SUM[i=0..n] A004207(i) = SUM[i=0..n] {b(1) = 1, b(j) = sum of digits of b(j) for j = 0..i} = SUM[i=0..n] {b(1) = 1, b(k) = A007953(b(k)) for k = 0..i}.
%e A176718 a(7) = 1 + 1 + 2 + 4 + 8 + 16 + 23 + 28 = 83 is prime.
%p A176718 A176718 := proc(n)
%p A176718 add( A004207(k),k=0..n) ;
%p A176718 end proc: # _R. J. Mathar_, Apr 02 2014
%Y A176718 Cf. A004207, A016052, A033298, A007612.
%K A176718 base,easy,nonn
%O A176718 0,2
%A A176718 _Jonathan Vos Post_, Apr 25 2010