login
A249764
Numbers which divide the concatenation, in ascending order, of their anti-divisors.
2
15, 30, 105, 120, 150, 222, 375, 585, 1500, 1695, 1755, 1800, 2700, 3449, 3750, 3840, 4891, 6720, 7680, 12000, 13583, 14400, 15000, 18750, 19200, 20940, 28134, 30000, 34800, 35625, 46875, 48000, 68400, 72504, 75000, 93750, 120000, 128400
OFFSET
1,1
LINKS
EXAMPLE
Anti-divisors of 15 are 2, 6, 10 and their concatenation in ascending order is 2610. Finally, 2610 / 15 = 174.
MAPLE
P:=proc(q) local a, k, n; for n from 3 to q do a:=0;
for k from 2 to n-1 do if abs((n mod k)-k/2)<1 then a:=a*10^(ilog10(k)+1)+k; fi; od;
if type(a/n, integer) then print(n); fi; od; end: P(10^9);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Paolo P. Lava, Nov 05 2014
STATUS
approved