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 A109711 #12 Mar 21 2015 04:46:47
%S A109711 1,12,78,87,292,362,1375,1387,1408,1430,1445,88664,355390,356630,
%T A109711 1420936,1423614,1428922
%N A109711 Numbers n such that the sum of the binary digits of n! is divisible by n.
%C A109711 Next term after 1445 is greater than 25000. - _Robert G. Wilson v_, Aug 08 2005
%C A109711 The quotient (sum of binary digits)/n is 1, 1, 2, 2, 3, 3, 4, 4, 4, 4, 4, 7, 8, 8, 9, 9, 9.
%e A109711 The binary digits of 1445! sum to 5780 and 5780 is divisible by 1445, so 1445 is in the sequence.
%t A109711 Do[k = n!; s = Plus @@ IntegerDigits[k, 2]; If[Mod[s, n] == 0, Print[n]], {n, 1, 10^4}]
%o A109711 (PARI) is(n)=my(v=binary(n!)); sum(i=1, #v, v[i])%n==0 \\ _Charles R Greathouse IV_, Jun 24 2011
%o A109711 (PARI) is(n)=hammingweight(n!)%n==0 \\ _Charles R Greathouse IV_, Mar 28 2013
%K A109711 base,hard,nonn
%O A109711 1,2
%A A109711 _Ryan Propper_, Aug 08 2005
%E A109711 a(12)-a(17) from _Lars Blomberg_, Jun 24 2011