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

Author

Benoit Cloitre, Feb 19 2002

Keywords

• nonn

Programs

Mathematica

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