|
|
A237878
|
|
Composite numbers n such that n | A072514 (n).
|
|
0
|
|
|
4, 16, 22, 34, 108, 121, 187, 232, 289, 300, 372, 2230, 4322, 8882, 23771, 36737, 48851, 50946, 67650, 75497, 424689, 482998, 581765, 4669921, 7374225, 9597001, 19722481, 110714642, 416101557, 1478286411, 1773582750
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
The unrelated numbers to 16 are 6, 10, 12 and 14.
The remainders when 16 is divided by these numbers are 4, 6, 4, 2.
Their sum is 16 and 16 / 16 = 1.
|
|
MAPLE
|
P:=proc(q) local i, n, t; for n from 2 to q do if not isprime(n) then t:=0;
for i from 1 to n-1 do if not gcd(i, n)=1 then if not type(n/i, integer) then t:=t+(n mod i); fi; fi; od;
if type(t/n, integer) then print(n); fi; fi; od; end: P(10^6);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|