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 A161778 #7 May 04 2019 23:06:19
%S A161778 4,4,2,2,5,6,20,20,36,127,152,290,376,423,590,857,1279,1379,1928,2308,
%T A161778 2308,2859,3339,4200,5579,6252,6252,6968,7223,7738,11232,12206,13913,
%U A161778 13913,17338,17753,19914,22191,23130,25561,28102,28625,33642,33642,34814
%N A161778 The A161671(n)-th partial sum of A161671.
%F A161778 a(n) = Sum_{j=1..A161671(n)} A161671(j) = A163116(A161671(n)).
%e A161778 a(1) = A163116(A161671(1)) = A163116(2) = 4.
%e A161778 a(2) = A163116(A161671(2)) = A163116(2) = 4.
%e A161778 a(5) = A163116(A161671(5)) = A163116(3) = 5.
%p A161778 A141468 := proc(n) option remember ; if n <= 2 then n-1 ; else for a from procname(n-1)+1 do if not isprime(a) then RETURN(a) ; fi; od: fi; end:
%p A161778 A161671 := proc(n) ithprime(n)-A141468(n) ; end:
%p A161778 A161778 := proc(n) add( A161671(j),j=1..A161671(n)) ; end: seq(A161778(n),n=1..90) ; # _R. J. Mathar_, Oct 04 2009
%Y A161778 Cf. A000040, A141468, A161671.
%K A161778 nonn,less
%O A161778 1,1
%A A161778 _Juri-Stepan Gerasimov_, Jun 19 2009
%E A161778 Edited, corrected from a(15) on, and extended by _R. J. Mathar_, Oct 04 2009