|
|
A131592
|
|
Sum of the squares of the first n^n primes.
|
|
0
|
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
Define 0^0 = 1 for this sequence.
|
|
EXAMPLE
|
The sum of the squares of the first 2^2 primes = 4+9+25+49 = 87, the third entry in the sequence.
|
|
MATHEMATICA
|
Join[{4}, Table[Total[Prime[Range[n^n]]^2], {n, 7}]] (* Harvey P. Dale, Jun 13 2016 *)
|
|
PROG
|
(PARI) sumprimesq(n) = { local(x, y, s, a); for(y=0, n, s=0; for(x=1, y^y, s+=prime(x)^2; ); print1(s", "); ) }
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|