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 A066993 #12 Mar 17 2020 15:14:07
%S A066993 1,4,13,20,24,36,40,65,64,84,112,96,128,121,171,186,200,216,168,208,
%T A066993 192,273,312,340,392,364,480,448,456,496,612,605,576,640,768,768,840,
%U A066993 880,840,936,960,1105,992,1200,1093,1280,1464,1364,1152,1539,1152,1664,1482
%N A066993 Integer of the form phi(n)*sigma(n)/n.
%H A066993 Harry J. Smith, <a href="/A066993/b066993.txt">Table of n, a(n) for n = 1..1000</a>
%F A066993 a(n) = sigma(A011775(n))*phi(A011775(n))/A011775(n).
%t A066993 Select[Table[EulerPhi[n] DivisorSigma[1,n]/n,{n,2000}],IntegerQ] (* _Harvey P. Dale_, Mar 17 2020 *)
%o A066993 (PARI) { n=0; for (m=1, 10^10, if ((a=eulerphi(m)*sigma(m)/m) % 1.0 == 0 , write("b066993.txt", n++, " ", a); if (n==1000, return)) ) } \\ _Harry J. Smith_, Apr 16 2010
%Y A066993 Cf. A011775.
%K A066993 nonn
%O A066993 1,2
%A A066993 _Benoit Cloitre_, Jan 27 2002
%E A066993 Missing term a(43)=992 and new term a(53)=1482 added by _Harry J. Smith_, Apr 16 2010