|
1, 21, 55, 69, 81, 115, 155, 185, 205, 261, 273, 285, 295, 321, 345, 355, 395, 405, 425, 465, 535, 555, 565, 595, 623, 625, 637, 665, 675, 749, 775, 805, 835, 847, 861, 865, 875, 889, 905, 973, 1001, 1029, 1041, 1075, 1089, 1095, 1125, 1165, 1183, 1211, 1225, 1239
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1, 1240, 2], Divisible[#, DigitCount[#, 2, 1]] &] (* Amiram Eldar, Aug 16 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|