A126033 a(n) is the largest prime < 5*a(n-1) for n > 1, with a(1) = 2.
2, 7, 31, 151, 751, 3739, 18691, 93427, 467123, 2335607, 11678021, 58390103, 291950479, 1459752391, 7298761949, 36493809683, 182469048409, 912345242041, 4561726210189, 22808631050929, 114043155254641, 570215776273147, 2851078881365711, 14255394406828543, 71276972034142687
Offset: 1
Keywords
Links
- Artur Jasinski, Table of n, a(n) for n = 1..40
Crossrefs
Cf. A126031.
Programs
-
Mathematica
Nest[Append[#,NextPrime[5Last[#],-1]]&,{2},24] (* James C. McMahon, Dec 23 2024 *)