|
|
A093865
|
|
a(1) = 2, a(n) = least prime > a(n-1)^n.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(6) has 253 digits and is too large to include. - Emeric Deutsch, Feb 04 2006
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|