|
|
A092922
|
|
a(1) = prime(1), a(2) = prime(prime( a(1) )), a(3) = prime(prime(prime( a(2) ))), a(4) = prime(prime(prime(prime( a(3) )))), etc.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
ithprime(1); ithprime(ithprime(%)); ithprime(ithprime(ithprime(%))); ithprime(ithprime(ithprime(ithprime(%))));
|
|
MATHEMATICA
|
a[1] = 2; a[n_] := Nest[Prime, a[n - 1], n]; Table[ a[n], {n, 5}] (* Robert G. Wilson v, Dec 24 2004 *)
|
|
CROSSREFS
|
Cf. A007097, the primeth recurrence.
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|