A127855 Quotients A120492(p)/p, where p = Prime[n].

3, 13, 3553, 4410001, 117279379988209, 2331742837337539921, 1542124619897735720591412481, 50763923011615077618322055249233, 103811229730824186819640201001214367336729

Offset

1,1

Comments

Prime p divides A120492(p), where A120492(n) = 1 + Sum[ Prime[k]^(n-1), {k,1,n}] = {2, 6, 39, 504, 17765, 552552, 30870007, ...}.

Links

Table of n, a(n) for n=1..9.

Formula

a(n) = A120492(Prime(n))/Prime(n). a(n) = (1 + Sum[ Prime[k]^(Prime[n]-1), {k,1,Prime[n]} ])/Prime[n].

Mathematica

Table[(1 + Sum[ Prime[k]^(Prime[n]-1), {k, 1, Prime[n]} ])/Prime[n], {n, 1, 15}]

Crossrefs

Cf. A120492, A121166, A120329.

Sequence in context: A138487 A022507 A108583 * A087333 A320041 A016104

Adjacent sequences: A127852 A127853 A127854 * A127856 A127857 A127858

Keyword

nonn

Author

Alexander Adamchuk, Feb 03 2007

Status

approved