|
%I #5 Nov 21 2013 12:49:35
%S 17,83,401,1092,2845,5753,12357,19920,33659,57259,80152,113660,180627,
%T 233148,329118,413586,584951,742021,927917,1209050,1500573,1815997,
%U 2286198,2771420,3302411,3852425,4848999,5721599,6536322,7584155
%N Sum of primes between consecutive positive cubes.
%e a(1) = 2 + 3 + 5 + 7 = 17, a(2) = 11 + 13 + 17 + 19 + 23 = 83.
%t Join[{17},Table[Total[Prime[Range[PrimePi[n^3]+1,PrimePi[(n+1)^3]]]],{n,2,35}]] (* _Harvey P. Dale_, Aug 16 2011 *)
%Y Cf. A158527, A048396.
%K nonn
%O 1,1
%A _Zak Seidov_, Mar 20 2009
|
