A093317 Consider numbers n such that mu(n) = mu(n+1), A064148; sequence gives values of mu(A064148(n)).

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

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Select[Partition[MoebiusMu[Range[300]], 2, 1], #[[1]]==#[[2]]&][[All, 1]] (* Harvey P. Dale, Sep 13 2019 *)

Crossrefs

Cf. A008683 (for mu), A064148.

Sequence in context: A120526 A086694 A357518 * A127253 A117944 A117945

Adjacent sequences: A093314 A093315 A093316 * A093318 A093319 A093320

Keyword

sign,easy

Author

Leroy Quet, Apr 26 2004

Extensions

More terms from Pab Ter (pabrlos(AT)yahoo.com), May 24 2004

Status

approved