A291140 Sum of the n-th powers of the first n primes.

2, 13, 160, 3123, 181258, 6732437, 493478344, 24995572327, 2255433009730, 470444892889497, 38714638073629150, 7749166585021832891, 1203906832960860262108, 121893712541593098356317, 17161342484454585041813494

Offset: 1

Author

Vojtech Strnad, Aug 18 2017

Keywords

• nonn

Examples

			a(3) = 2^3 + 3^3 + 5^3 = 160.
		

Links

• Vojtech Strnad, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A031971, A062457, A087480.

Programs

Maple

f:= n -> add(ithprime(i)^n,i=1..n):
map(f, [$1..20]); # Robert Israel, Aug 20 2017

Mathematica

Table[Total[Prime[Range@ n]^n], {n, 15}] (* Michael De Vlieger, Aug 19 2017 *)

PARI

a(n) = sum(i=1, n, prime(i)^n) \\ Felix Fröhlich, Aug 18 2017

Formula

a(n) = prime(1)^n + prime(2)^n + ... + prime(n)^n.