A124267 Largest prime < 10*a(n-1), a(1)=5.

5, 47, 467, 4663, 46619, 466183, 4661819, 46618183, 466181801, 4661818009, 46618180033, 466181800327, 4661818003217, 46618180032161, 466181800321609, 4661818003216081, 46618180032160669, 466181800321606627, 4661818003216066183, 46618180032160661801, 466181800321606617917

Offset: 1

Author

Artur Jasinski, Dec 16 2006

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A124262.

Programs

Mathematica

NestList[NextPrime[10 #, - 1]&, 5, 30] (* Vincenzo Librandi, Jun 28 2014 *)