|
|
A051416
|
|
Primes whose digits are composite.
|
|
6
|
|
|
89, 449, 499, 4649, 4889, 4969, 4999, 6449, 6469, 6689, 6869, 6899, 6949, 8669, 8689, 8699, 8849, 8969, 8999, 9649, 9689, 9949, 44449, 44699, 46489, 46499, 46649, 46889, 48449, 48649, 48869, 48889, 48989, 49499, 49669, 49999, 64489, 64499, 64849, 64969, 66449
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Primes formed by using only digits 4, 6, 8, 9. Of course, all the terms of this sequence end with 9. - Bernard Schott, Jan 31 2019
|
|
LINKS
|
|
|
EXAMPLE
|
89 is the smallest composite-digit prime and also the only composite-digit prime whose digits are distinct. - Bernard Schott, Jan 31 2019
|
|
MATHEMATICA
|
Select[Prime@Range[6500], Intersection[IntegerDigits[ # ], {0, 1, 2, 3, 5, 7}] == {} & ] (* Ray Chandler, Mar 04 2007 *)
With[{c = {4, 6, 8, 9}}, Array[Select[Map[FromDigits@ Append[#, 9] &, Tuples[c, {#}]], PrimeQ] &, 4]] // Flatten (* Michael De Vlieger, Feb 02 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy,base,less
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|