OFFSET
1,1
LINKS
Vojtech Strnad, Table of n, a(n) for n = 1..200
FORMULA
a(n) = prime(1)^n + prime(2)^n + ... + prime(n)^n.
EXAMPLE
a(3) = 2^3 + 3^3 + 5^3 = 160.
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 *)
PROG
(PARI) a(n) = sum(i=1, n, prime(i)^n) \\ Felix Fröhlich, Aug 18 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Vojtech Strnad, Aug 18 2017
STATUS
approved