login
A104128
a(n) = p + p^(p+1), where p = prime(n).
3
10, 84, 15630, 5764808, 3138428376732, 3937376385699302, 14063084452067724991026, 37589973457545958193355620, 480250763996501976790165756943064, 74462898441675122902293018227199467668020630, 529144398052420314716929933900838757437386767392
OFFSET
1,1
COMMENTS
Sum of reciprocals rapidly converges to 0.11196891489794721930017828981362..
LINKS
FORMULA
a(n) = A000040(n) + A104126(n).
MATHEMATICA
Table[p + p^(p+1), {p, Prime[Range[12]]}] (* Robert G. Wilson v, Feb 27 2012 *)
PROG
(Maxima) A104128(n) := block(
return(A000040(n)^(1+A000040(n))+A000040(n))
)$ /* R. J. Mathar, Feb 27 2012 */
(PARI) A104128(n)=(n=prime(n))+n^(n+1) \\ M. F. Hasler, Feb 26 2012
CROSSREFS
Sequence in context: A321295 A350903 A318793 * A345895 A014341 A323970
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Mar 06 2005
EXTENSIONS
Definition corrected and incorrect program removed by R. J. Mathar, Feb 27 2012
More terms from Harvey P. Dale, Feb 27 2012
STATUS
approved