A120826 a(n) consecutive digits ascending beginning with the digit 8 give a prime.
2, 82, 152, 7066, 84892
Offset: 1
Examples
2 is a term since 89 is a prime. 82 is a term because 8901234567890123456789012345678901234567890123456789012345678901234567890123456789 is a prime.
Programs
-
Mathematica
fQ[n_] := PrimeQ@ FromDigits@ Mod[7+Range@n, 10]; lst = {}; Do[ If[fQ@n, AppendTo[lst, n]; Print@n], {n, 5000}]; lst
Extensions
a(4) from Bert Dobbelaere, Apr 01 2025
a(5) from Michael S. Branicky, Apr 03 2025
Comments