login
A206941
a(n) = phi(lambda(n)), where phi = A000010, lambda = A002322.
3
1, 1, 1, 1, 2, 1, 2, 1, 2, 2, 4, 1, 4, 2, 2, 2, 8, 2, 6, 2, 2, 4, 10, 1, 8, 4, 6, 2, 12, 2, 8, 4, 4, 8, 4, 2, 12, 6, 4, 2, 16, 2, 12, 4, 4, 10, 22, 2, 12, 8, 8, 4, 24, 6, 8, 2, 6, 12, 28, 2, 16, 8, 2, 8, 4, 4, 20, 8, 10, 4, 24, 2, 24, 12, 8, 6, 8, 4, 24, 2, 18
OFFSET
1,5
REFERENCES
W. J. LeVeque, Topics in Number Theory. Addison-Wesley, Reading, MA, 2 vols., 1956, Vol. 1, p. 55, Theorem 4.10.
LINKS
R. D. Carmichael, Note on a new number theory function, Bull. Amer. Math. Soc. 16 (1909-10), 232-238.
MATHEMATICA
Table[EulerPhi@ CarmichaelLambda@ n, {n, 96}] (* Michael De Vlieger, Mar 18 2016 *)
PROG
(Haskell)
a206941 = a000010 . a002322 -- Reinhard Zumkeller, Feb 18 2012
(PARI) a(n)=eulerphi(lcm(znstar(n)[2])) \\ Charles R Greathouse IV, Feb 21 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Feb 13 2012
STATUS
approved