A363023 Primes having only {1, 6, 9} as digits.
11, 19, 61, 191, 199, 619, 661, 691, 911, 919, 991, 1619, 1669, 1699, 1999, 6199, 6619, 6661, 6691, 6911, 6961, 6991, 9161, 9199, 9619, 9661, 11119, 11161, 11699, 11969, 16111, 16619, 16661, 16691, 16699, 19661, 19699, 19919, 19961, 19991, 61169, 61961
Offset: 1
Links
- Jason Bard, Table of n, a(n) for n = 1..10000 (first 2500 terms from Harvey P. Dale)
- Index to entries for primes with digits in a given set
Programs
-
Mathematica
Table[Select[Flatten[10#+{1,9}&/@FromDigits/@Tuples[{1,6,9},n]],PrimeQ],{n,4}]//Flatten