A124337 Largest prime < 10*a(n-1), a(1)=37.
37, 367, 3659, 36587, 365851, 3658493, 36584923, 365849221, 3658492207, 36584922001, 365849219993, 3658492199881, 36584921998777, 365849219987749, 3658492199877481, 36584921998774777, 365849219987747737, 3658492199877477343, 36584921998774773359, 365849219987747733553
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..200
Crossrefs
Cf. A124262.
Programs
-
Mathematica
NestList[NextPrime[10 #, -1]&, 37, 30] (* Vincenzo Librandi, Jun 28 2014 *)