A113635 Sum of the first 7^n primes.

2, 58, 4888, 363288, 24047406, 1482656786, 87401659166, 4997438572618, 279544493456056, 15382405126365576, 835737977869494888, 44947274043643171988, 2397349106561086277820, 126986150948361831547964, 6687136917574958175921116, 350384258762032443770716600

Offset: 0

Author

Cino Hilliard, Jan 15 2006

Keywords

• nonn

Examples

			The first 7^1 primes add up to 58.
		

Links

• Amiram Eldar, Table of n, a(n) for n = 0..20 (calculated using Kim Walisch's primesum program)
• Kim Walisch, Sum of the primes below x (primesum).

Crossrefs

Cf. A000420, A007504, A058239, A099825, A099826, A113633, A113634.

Programs

Mathematica

t = {}; c = 1; k = 3; s = 2; Do[While[c < 7^n, If[ PrimeQ@k, c++; s += k]; k += 2]; Print@s; AppendTo[t, s], {n, 0, 9}]; t (* Robert G. Wilson v, Jan 17 2006 *)
Table[Total[Prime[Range[7^n]]],{n,0,7}] (* The program generates the first 8 terms of the sequence. *) (* Harvey P. Dale, Jan 18 2024 *)

Formula

a(n) = A007504(A000420(n)). - Michel Marcus, Aug 01 2015

Extensions

a(12) onwards from Amiram Eldar, Jul 01 2024