A135485 a(n) = Sum_{i=1..n} prime(i)^(i-1), where prime(i) denotes i-th prime number.

1, 4, 29, 372, 15013, 386306, 24523875, 918395614, 79229380895, 14586375356764, 834214662337565, 178751836441797978, 22742242136807984059, 1741006366419098769302, 258407992554086508103671

Offset

1,2

Comments

The primes in this sequence are 29 = 2^0 + 3^1 + 5^2, 15013 = 2^0 + 3^1 + 5^2 + 7^3 + 11^4, 82630...60939 (a 107-digit number) = 2^0 + 3^1 + 5^2 + ... + 211^46, ...

Links

G. C. Greubel, Table of n, a(n) for n = 1..250

Mathematica

f[n_] := Sum[Prime[i]^(i - 1), {i, n}]; Array[f, 16] (* Robert G. Wilson v, Feb 12 2008 *)

Prog

(PARI) a(n) = sum(k=1, n, prime(k)^(k-1)); \\ Michel Marcus, Oct 15 2016

Crossrefs

Cf. A000040, A087480, A135484.

Partial sums of A093360.

Sequence in context: A168602 A368452 A000798 * A210526 A221079 A370165

Adjacent sequences: A135482 A135483 A135484 * A135486 A135487 A135488

Keyword

nonn

Author

Ctibor O. Zizka, Feb 07 2008, Feb 17 2008

Extensions

Edited and extended by Robert G. Wilson v, Feb 12 2008

Status

approved