A386180 Primes having only {3, 5, 6, 9} as digits.
3, 5, 53, 59, 353, 359, 563, 569, 593, 599, 653, 659, 953, 3359, 3533, 3539, 3559, 3593, 3659, 5333, 5393, 5399, 5563, 5569, 5639, 5653, 5659, 5669, 5693, 5939, 5953, 6353, 6359, 6553, 6563, 6569, 6599, 6653, 6659, 6959, 9533, 9539, 33353, 33359, 33533, 33563
Offset: 1
Links
Programs
-
Magma
[p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [3, 5, 6, 9]];
-
Mathematica
Flatten[Table[Select[FromDigits /@ Tuples[{3, 5, 6, 9}, n], PrimeQ], {n, 7}]]
-
PARI
primes_with(, 1, [3, 5, 6, 9]) \\ uses function in A385776
-
Python
print(list(islice(primes_with("3569"), 41))) # uses function/imports in A385776