|
|
A020463
|
|
Primes that contain digits 3 and 7 only.
|
|
11
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Flatten[Table[Select[FromDigits/@Tuples[{3, 7}, n], PrimeQ], {n, 7}]] (* Vincenzo Librandi, Jul 27 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|