login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Primes with n consecutive digits ascending beginning with the digit nine.
8

%I #6 Sep 06 2015 16:41:56

%S 13,29,43

%N Primes with n consecutive digits ascending beginning with the digit nine.

%C Digits are in ascending order beginning with 9 and after 9 comes 0.

%C The sequence "Primes with n consecutive digits descending beginning with the digit nine" has no terms.

%C There is no further term up to 26000. - _Farideh Firoozbakht_, Sep 11 2006

%e 13 is a term since 9012345678901 is a prime.

%t fQ[n_] := PrimeQ@ FromDigits@ Mod[8+Range@n, 10]; lst = {}; Do[ If[fQ@n, AppendTo[lst, n]; Print@n], {n, 5000}]; lst

%t Flatten[Position[Table[FromDigits[PadRight[{},n,{9,0,1,2,3,4,5,6,7,8}]],{n,100}],_?PrimeQ]] (* _Harvey P. Dale_, Sep 06 2015 *)

%Y Cf. A006055, A120819, A120820, A120821, A120822, A120823, A120824, A120825, A120826.

%K base,bref,hard,nonn

%O 1,1

%A _Robert G. Wilson v_, Jul 05 2006