A158528 Sum of primes between consecutive positive cubes.

17, 83, 401, 1092, 2845, 5753, 12357, 19920, 33659, 57259, 80152, 113660, 180627, 233148, 329118, 413586, 584951, 742021, 927917, 1209050, 1500573, 1815997, 2286198, 2771420, 3302411, 3852425, 4848999, 5721599, 6536322, 7584155, 8889048, 10462469, 12034300, 14236344, 15137532, 18155279

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..600

Example

a(1) = 2 + 3 + 5 + 7 = 17, a(2) = 11 + 13 + 17 + 19 + 23 = 83.

Maple

R:= NULL: p:= 0:
for k from 2 to 50 do
  t:= p;
  do
    p:= nextprime(p);
    if p > k^3 then
       R:= R, t; break
    fi;
    t:= t+p
od; od:
R; # Robert Israel, Jun 12 2026

Mathematica

Join[{17}, Table[Total[Prime[Range[PrimePi[n^3]+1, PrimePi[(n+1)^3]]]], {n, 2, 35}]] (* Harvey P. Dale, Aug 16 2011 *)

Crossrefs

Cf. A158527, A048396.

Sequence in context: A343498 A318743 A193046 * A197346 A213436 A239667

Adjacent sequences: A158525 A158526 A158527 * A158529 A158530 A158531

Keyword

nonn

Author

Zak Seidov, Mar 20 2009

Extensions

More terms from Robert Israel, Jun 12 2026

Status

approved