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 A055993 #15 Jul 14 2019 17:58:01
%S A055993 1,1,1,2,2,6,6,8,12,30,30,36,36,72,96,128,128,180,180,300,300,600,600,
%T A055993 864,1152,2304,2688,4368,4368,5376,5376,6144,6144,13056,16320,19440,
%U A055993 19440,38880,43200,48000,48000,64000,64000,100800,133056,278784,278784
%N A055993 Number of square divisors of n!.
%H A055993 Amiram Eldar, <a href="/A055993/b055993.txt">Table of n, a(n) for n = 1..1000</a>
%F A055993 a(n) = A046951(n!) = A000005(A055772(n)) = A000005(A000188(A000142(n))).
%t A055993 Table[Count[Divisors[n!], d_ /; IntegerQ@ Sqrt@ d], {n, 30}] (* _Michael De Vlieger_, Feb 05 2017 *)
%o A055993 (PARI) a(n) = sumdiv(n!, d, issquare(d)); \\ _Michel Marcus_, Dec 26 2013
%Y A055993 Cf. A000142, A000005, A046951, A055772, A000188.
%K A055993 nonn
%O A055993 1,4
%A A055993 _Labos Elemer_, Jul 21 2000