The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A199515 Denominators of: MoebiusMu(n)^2*(n/(n - EulerPhi(n))). 2
 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, 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, 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 (list; graph; refs; listen; history; text; internal format)
 OFFSET 2,5 COMMENTS Denominators of zeros to a symmetric polynomial. See A199514 for numerators and program. LINKS Antti Karttunen, Table of n, a(n) for n = 2..65537 FORMULA A199514(n)/a(n) = A008683(n)^2*(n/(n - A000010(n))), n > 1. a(n) = denominator of A008966(n)*(n/A051953(n)). - Antti Karttunen, Sep 07 2018 MATHEMATICA Table[MoebiusMu[n]^2 (n/(n-EulerPhi[n])), {n, 2, 90}]//Denominator (* Harvey P. Dale, May 15 2022 *) PROG (PARI) A199155(n) = denominator(issquarefree(n)*(n/(n-eulerphi(n)))); \\ Antti Karttunen, Sep 07 2018 CROSSREFS Cf. A000010, A008683, A191898. Numerators: A199514. Sequence in context: A054576 A326840 A326153 * A316695 A316767 A292505 Adjacent sequences: A199512 A199513 A199514 * A199516 A199517 A199518 KEYWORD nonn,frac AUTHOR Mats Granvik, Nov 07 2011 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 22 17:59 EDT 2023. Contains 365531 sequences. (Running on oeis4.)