%I A161778
%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.
%Y A161778 Sequence in context: A029676 A105190 A002581 this_sequence A099655 A146899 
               A031351
%Y A161778 Adjacent sequences: A161775 A161776 A161777 this_sequence A161779 A161780 
               A161781
%K A161778 nonn,less
%O A161778 1,1
%A A161778 Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), Jun 19 2009
%E A161778 Edited, corrected from a(15) on, and extended by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), 
               Oct 04 2009