This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A237878 #23 Sep 27 2015 02:40:36 %S A237878 4,16,22,34,108,121,187,232,289,300,372,2230,4322,8882,23771,36737, %T A237878 48851,50946,67650,75497,424689,482998,581765,4669921,7374225,9597001, %U A237878 19722481,110714642,416101557,1478286411,1773582750 %N A237878 Composite numbers n such that n | A072514 (n). %C A237878 a(24) > 3000000. - _Giovanni Resta_, Feb 17 2014 %C A237878 a(32) > 4 * 10^9. - _Hiroaki Yamanouchi_, Oct 01 2014 %e A237878 The unrelated numbers to 16 are 6, 10, 12 and 14. %e A237878 The remainders when 16 is divided by these numbers are 4, 6, 4, 2. %e A237878 Their sum is 16 and 16 / 16 = 1. %p A237878 P:=proc(q) local i,n,t; for n from 2 to q do if not isprime(n) then t:=0; %p A237878 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; %p A237878 if type(t/n,integer) then print(n); fi; fi; od; end: P(10^6); %Y A237878 Cf. A072514. %K A237878 nonn,more %O A237878 1,1 %A A237878 _Paolo P. Lava_, Feb 14 2014 %E A237878 a(16)-a(23) from _Giovanni Resta_, Feb 17 2014 %E A237878 a(24)-a(28) from _Hiroaki Yamanouchi_, Oct 01 2014 %E A237878 a(29)-a(31) from _Hiroaki Yamanouchi_, Sep 27 2015