login
A197114
Primes containing the digits (2,0,0,9) in that order.
1
32009, 52009, 82009, 92009, 120091, 120097, 172009, 182009, 200903, 200909, 200927, 200929, 200971, 200983, 200987, 200989, 242009, 272009, 302009, 322009, 332009, 420097, 442009, 452009, 512009, 532009, 620099, 622009, 682009, 692009, 720091, 742009, 752009
OFFSET
1,1
REFERENCES
Roozbeh Hazrat, Mathematica: A Problem-Centered Approach, Springer 2010, pp. 104-105
LINKS
MATHEMATICA
Select[Prime[Range[100000]], MemberQ[Partition[IntegerDigits[#], 4, 1], {2, 0, 0, 9}]&]
CROSSREFS
Sequence in context: A235309 A269318 A269319 * A224621 A231613 A054038
KEYWORD
nonn,base
AUTHOR
Harvey P. Dale, Oct 10 2011
STATUS
approved