A093865 a(1) = 2, a(n) = least prime > a(n-1)^n.

2, 5, 127, 260144663, 1191446656198440121121655815832664828439647

Offset

1,1

Comments

a(6) has 253 digits and is too large to include. - Emeric Deutsch, Feb 04 2006

Links

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

Example

a(3)=127 because a(2)^3=125 and the least prime greater than 125 is 127.

Maple

a:= proc(n) option remember; if n=1 then 2 else nextprime(a(n-1)^n) fi end: seq(a(n), n=1..6); # Emeric Deutsch, Feb 04 2006

Mathematica

nxt[{n_, a_}]:={n+1, NextPrime[a^(n+1)]}; NestList[nxt, {1, 2}, 5][[All, 2]] (* Harvey P. Dale, Nov 15 2018 *)

Crossrefs

Sequence in context: A214648 A175978 A092922 * A139129 A139484 A088271

Adjacent sequences: A093862 A093863 A093864 * A093866 A093867 A093868

Keyword

nonn

Author

Amarnath Murthy, Apr 20 2004

Extensions

More terms from Emeric Deutsch, Feb 04 2006

Status

approved