|
|
A243537
|
|
Numbers n such that list of divisors of n contains 4 distinct digits (in base 10).
|
|
11
|
|
|
6, 8, 10, 14, 21, 26, 35, 49, 50, 51, 62, 65, 66, 82, 85, 88, 91, 110, 115, 117, 123, 133, 141, 142, 159, 165, 169, 183, 209, 213, 217, 221, 226, 231, 239, 244, 250, 253, 257, 262, 263, 269, 275, 283, 293, 295, 299, 307, 309, 319, 326, 333, 347, 349, 355, 359
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
49 is in sequence because divisors of 49: (1, 7, 49) contain 4 distinct digits (1, 4, 7, 9).
|
|
MATHEMATICA
|
Select[Range[400], Length[Union[Flatten[IntegerDigits/@Divisors[#]]]] == 4&] (* Harvey P. Dale, Aug 22 2021 *)
|
|
PROG
|
(Excel) [Row n = 1 …10000; Column A: A(n) = A095048(n); Column B: B(n) = IF(A(n)=4; A(n)); Arrangement of column B]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|