|
|
A187398
|
|
Numbers divisible by at least three of their digits, all different and >1.
|
|
9
|
|
|
248, 264, 324, 384, 396, 432, 624, 648, 672, 728, 735, 784, 824, 864, 936, 1236, 1248, 1296, 1326, 1362, 1368, 1395, 1632, 1692, 1764, 1824, 1926, 1935, 1962, 2048, 2064, 2136, 2184, 2196, 2248, 2304, 2316, 2328, 2340, 2346, 2364, 2376, 2384, 2394, 2408, 2436, 2448, 2460, 2480, 2488, 2496, 2540, 2568, 2584, 2604, 2634, 2640, 2648, 2664, 2688, 2730, 2736, 2744, 2784, 2824, 2832, 2840, 2848, 2856, 2864, 2916, 2934, 2964, 2984, 3024, 3048, 3096, 3126, 3162, 3168
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
numdig = 3; Select[Range[3168], Length[(u = Union[Select[IntegerDigits[#], #1 > 1 &]])] >= numdig && Plus @@ (Boole@Divisible[#, u]) >= numdig &] (* Amiram Eldar, Aug 30 2020 *)
|
|
CROSSREFS
|
Subsequence of A187516 (numbers divisible by at least two of their digits, different and >1).
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|