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 A199515 #25 Jul 14 2024 20:02:23
%S A199515 1,1,1,1,2,1,1,1,3,1,1,1,4,7,1,1,1,1,1,3,6,1,1,1,7,1,1,1,11,1,1,13,9,
%T A199515 11,1,1,10,5,1,1,5,1,1,1,12,1,1,1,1,19,1,1,1,3,1,7,15,1,1,1,16,1,1,17,
%U A199515 23,1,1,25,23,1,1,1,19,1,1,17,9,1,1,1,21,1,1,21,22,31,1,1,1
%N A199515 Denominators of: MoebiusMu(n)^2*(n/(n - EulerPhi(n))).
%C A199515 Denominators of zeros to a symmetric polynomial.
%C A199515 See A199514 for numerators and program.
%H A199515 Antti Karttunen, <a href="/A199515/b199515.txt">Table of n, a(n) for n = 2..65537</a>
%F A199515 A199514(n)/a(n) = A008683(n)^2*(n/(n - A000010(n))), n > 1.
%F A199515 a(n) = denominator of A008966(n)*(n/A051953(n)). - _Antti Karttunen_, Sep 07 2018
%t A199515 Table[MoebiusMu[n]^2 (n/(n-EulerPhi[n])),{n,2,90}]//Denominator (* _Harvey P. Dale_, May 15 2022 *)
%o A199515 (PARI) A199515(n) = denominator(issquarefree(n)*(n/(n-eulerphi(n)))); \\ _Antti Karttunen_, Sep 07 2018
%Y A199515 Cf. A000010, A008683, A191898. Numerators: A199514.
%K A199515 nonn,frac
%O A199515 2,5
%A A199515 _Mats Granvik_, Nov 07 2011