A131592 Sum of the squares of the first n^n primes.

4, 4, 87, 86606, 204330315, 792563962432, 4719861842243387, 41451006295401961098, 518092272952383680058459, 8925618852825931358421021092, 206076219788796447007218742841043

Offset

0,1

Comments

Define 0^0 = 1 for this sequence.

Links

Table of n, a(n) for n=0..10.

Formula

a(n) = A024450(A000312(n)). - Amiram Eldar, Jul 01 2024

Example

The sum of the squares of the first 2^2 primes is a(2) = 4 + 9 + 25 + 49 = 87.

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", "); ) }
(PARI) lista(pmax) = {my(s = 0, k = 0, n = 1, nn = 1); print1(4, ", "); forprime(p = 2, pmax, k++; s += p^2; if(k == nn, print1(s, ", "); n++; nn = n^n)); } \\ Amiram Eldar, Jul 01 2024

Crossrefs

Cf. A000312, A024450.

Sequence in context: A351349 A222271 A068376 * A317868 A224092 A217188

Adjacent sequences: A131589 A131590 A131591 * A131593 A131594 A131595

Keyword

nonn,more

Author

Cino Hilliard, Aug 30 2007

Extensions

a(7) from Harvey P. Dale, Jun 13 2016

a(8)-a(10) from Amiram Eldar, Jul 01 2024

Status

approved