A106045 For n>=2, a(n) = prime[prime[a(n-1)] + a(n-1)]; a(1)=1.

1, 5, 53, 1931, 207869, 51294911, 24248219519, 19450040191157, 24316888409626507

Offset

1,2

Comments

Next term is too large to include

Links

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

Mathematica

NestList[Prime[Prime[#]+#]&, 1, 8] (* Harvey P. Dale, Aug 01 2020 *)

Crossrefs

Sequence in context: A113068 A099086 A304999 * A168568 A048551 A236529

Adjacent sequences: A106042 A106043 A106044 * A106046 A106047 A106048

Keyword

nonn

Author

Zak Seidov, May 06 2005

Extensions

More terms from Harvey P. Dale, Aug 01 2020

Status

approved