editing
approved
Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
editing
approved
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 *)
approved
editing
There is no further term up to 26000. - _Farideh Firoozbakht (mymontain(AT)yahoo.com), _, Sep 11 2006
_Robert G. Wilson v (rgwv(AT)rgwv.com), _, Jul 05 2006
Primes with n consecutive digits ascending beginning with the digit nine.
13, 29, 43
1,1
Digits are in ascending order beginning with 9 and after 9 comes 0.
The sequence "Primes with n consecutive digits descending beginning with the digit nine" has no terms.
There is no further term up to 26000. - Farideh Firoozbakht (mymontain(AT)yahoo.com), Sep 11 2006
13 is a term since 9012345678901 is a prime.
fQ[n_] := PrimeQ@ FromDigits@ Mod[8+Range@n, 10]; lst = {}; Do[ If[fQ@n, AppendTo[lst, n]; Print@n], {n, 5000}]; lst
base,bref,hard,nonn,new
Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 05 2006
approved