|
|
A036946
|
|
Smallest n-digit prime containing only the digits 5 and 7, or 0 if no such prime exists.
|
|
1
|
|
|
5, 0, 557, 5557, 57557, 555557, 5555777, 55555777, 555557557, 5555555557, 55555555777, 555555575557, 5555555757757, 55555555575757, 555555555555557, 5555555555557577, 55555555555777777, 555555555557557757, 5555555555555557577, 55555555555575755777
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Flatten[Join[{5, 0}, Table[Select[FromDigits/@(Join[#, {7}]&/@Tuples[ {5, 7}, n]), PrimeQ, 1], {n, 2, 20}]]] (* Harvey P. Dale, Mar 08 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|