login
A106045
For n>=2, a(n) = prime[prime[a(n-1)] + a(n-1)]; a(1)=1.
0
1, 5, 53, 1931, 207869, 51294911, 24248219519, 19450040191157, 24316888409626507
OFFSET
1,2
COMMENTS
Next term is too large to include
MATHEMATICA
NestList[Prime[Prime[#]+#]&, 1, 8] (* Harvey P. Dale, Aug 01 2020 *)
CROSSREFS
Sequence in context: A113068 A099086 A304999 * A168568 A048551 A236529
KEYWORD
nonn
AUTHOR
Zak Seidov, May 06 2005
EXTENSIONS
More terms from Harvey P. Dale, Aug 01 2020
STATUS
approved