A067196 Numbers n such that M(n) = Sum_{i=1..n} mu(phi(i)) where M(n) is the Mertens function A002321(n).

1, 6, 142, 154, 157, 167, 168, 169, 209, 213, 214, 231, 232, 235, 236, 238, 239, 240, 242, 243, 244, 245, 247, 248, 251, 252, 257, 259, 260, 261, 263, 264, 266, 269, 270, 278, 279, 280, 301, 318, 362, 363, 364, 366, 367, 368, 369, 371, 372, 391, 392, 402

Offset

1,2

Links

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

Mathematica

mQ[n_]:=Sum[MoebiusMu[i], {i, n}]==Sum[MoebiusMu[EulerPhi[i]], {i, n}]; Select[Range[405], mQ[#] &] (* Jayanta Basu, May 22 2013 *)

Crossrefs

Sequence in context: A241015 A245986 A225810 * A286446 A048863 A363989

Adjacent sequences: A067193 A067194 A067195 * A067197 A067198 A067199

Keyword

nonn

Author

Benoit Cloitre, Feb 19 2002

Status

approved