A108313 Sum of primes q with prime(n) < q < 2*prime(n).

3, 5, 7, 24, 49, 59, 102, 120, 181, 252, 341, 515, 553, 593, 635, 883, 1153, 1092, 1283, 1488, 1415, 1793, 1873, 2124, 2771, 3066, 2963, 3067, 2958, 3068, 4361, 4487, 5153, 5291, 5999, 5848, 6622, 6776, 6940, 7104, 7974, 8152, 9080, 9270, 9462, 9660, 11099

Offset: 1

Author

Giovanni Teofilatto, Jun 30 2005

Keywords

• easy
• nonn

Comments

Sum of the numbers not killed in the first jump of a Sieve of Eratosthenes table. - Odimar Fabeny, Jul 21 2010

Examples

			a(3) = 24 because between 7 and 14 there are two primes 11 and 13 whose sum is 24.
		

Programs

Mathematica

f[n_] := Plus @@ Prime[Range[n + 1, PrimePi[2Prime[n]]]]; Table[ f[n], {n, 40}] (* Robert G. Wilson v, Jul 01 2005 *)

Extensions

Edited and extended by Robert G. Wilson v, Jul 01 2005