A020463 Primes that contain digits 3 and 7 only.
3, 7, 37, 73, 337, 373, 733, 773, 3373, 3733, 7333, 33377, 33773, 37337, 77377, 77773, 333337, 333737, 373777, 377737, 733333, 733373, 737773, 773777, 777373, 777737, 3333373, 3333773, 3337333, 3337777, 3377377, 3733333, 3773377, 3773773, 3777377, 7337333, 7337777, 7377373, 7733377, 7737337
Offset: 1
Links
- Jason Bard, Table of n, a(n) for n = 1..10000 (first 1000 terms from Vincenzo Librandi)
- MathOverflow, 3-7 primes in base 10
Programs
-
Mathematica
Flatten[Table[Select[FromDigits/@Tuples[{3,7},n],PrimeQ],{n,7}]] (* Vincenzo Librandi, Jul 27 2012 *)