A087480 Sum of all the primes raised to their corresponding powers.

2, 11, 136, 2537, 163588, 4990397, 415329070, 17398892111, 1818551553574, 422525784853775, 25831002681258606, 6608783008521293887, 931711885323534923208, 74817069229462038688657

Offset: 1

Author

Andy Edwards (AndynGen(AT)aol.com), Sep 09 2003

Keywords

• easy
• nonn

Examples

			a(4) = 2^1 + 3^2 + 5^3 + 7^4 = 2 + 9 + 125 + 2401 = 2537.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..299

Crossrefs

Partial sums of A062457.

Programs

Maple

ListTools:-PartialSums( [seq(ithprime(i)^i, i=1..100)]); # Robert Israel, Nov 09 2015

Mathematica

a[1] = 2; a[n_] := a[n - 1] + Prime[n]^n; Table[a[n], {n, 15}] (* Carlos Eduardo Olivieri, Nov 09 2015 *)
Accumulate[Table[Prime[n]^n,{n,20}]] (* Harvey P. Dale, May 11 2019 *)

PARI

a(n) = sum(i=1, n, prime(i)^i); \\ Michel Marcus, Sep 05 2013

Formula

a(n) = a(n-1) + prime(n)^n where prime(n) is the n-th prime.

Extensions

Corrected and extended by Ray Chandler, Sep 14 2003