A343910 a(n) = mu(phi(n)), where mu is the Möbius function and phi is the Euler totient function.

1, 1, -1, -1, 0, -1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 1, 1, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0, -1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0

Offset

1

Links

Table of n, a(n) for n=1..90.

Formula

a(n) = A008683(A000010(n)).

Mathematica

Table[MoebiusMu[EulerPhi[n]], {n, 100}]

Crossrefs

Cf. A000010 (phi), A008683 (mu).

Sequence in context: A114000 A131218 A174391 * A329682 A113998 A253084

Adjacent sequences: A343907 A343908 A343909 * A343911 A343912 A343913

Keyword

sign

Author

Wesley Ivan Hurt, May 03 2021

Status

approved