A098138 a(n) = p^n + n^p where p = prime(n).

3, 17, 368, 18785, 48989176, 13065520825, 232630924325880, 144115205059418913, 8862938121453653757392, 100000000000000420707233300201, 191943424957750505912623737696642, 8505622499821102144582714636120669969873, 4695452425098908797088972334440524350089758134

Offset

1,1

Links

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

Example

a(1) = 2^1 + 1^2 = 3.
a(2) = 3^2 + 2^3 = 17.
a(3) = 5^3 + 3^5 = 368.

Maple

a:= n-> (p-> p^n+n^p)(ithprime(n)):
seq(a(n), n=1..15);  # Alois P. Heinz, Aug 26 2015

Mathematica

Table[n^Prime[n] + Prime[n]^n, {n, 1, 15}] (* Stefan Steinerberger, Feb 28 2006 *)

Crossrefs

Sequence in context: A192556 A144033 A349643 * A009719 A332758 A023150

Adjacent sequences: A098135 A098136 A098137 * A098139 A098140 A098141

Keyword

nonn

Author

Parthasarathy Nambi, Sep 27 2004

Extensions

More terms from Stefan Steinerberger, Feb 28 2006

Status

approved