A099274 Sum of the prime(n) primes following prime(n).

8, 23, 67, 143, 353, 527, 905, 1187, 1751, 2785, 3287, 4691, 5843, 6589, 7947, 10157, 12661, 13787, 16715, 18941, 20325, 23889, 26643, 30771, 36501, 39861, 41937, 45581, 47801, 51749, 64743, 69357, 76161, 79093, 90677, 93855, 101769, 110069

Offset

1,1

Links

Table of n, a(n) for n=1..38.

Example

a(3) = 7 + 11 + 13 + 17 + 19 = 67 since p_3 = 5 and the sum of the next 5 prime numbers after 5 is 67.

Mathematica

list = {}; For[x = 1, x < 100 (*change this value to get more terms*), x++, AppendTo[list, Sum[Prime[n], {n, x + 1, x + Prime[x]}]]]; list
f[n_]:=Module[{pn=Prime[n]}, Total[Prime[Range[n+1, n+pn]]]]; f/@Range[50] (* Harvey P. Dale, Mar 12 2011 *)

Crossrefs

Sequence in context: A241353 A362163 A059209 * A208633 A036562 A320310

Adjacent sequences: A099271 A099272 A099273 * A099275 A099276 A099277

Keyword

nonn

Author

Matthew Howells (mathmatt(AT)gmail.com), Nov 16 2004

Status

approved