login
A093316
a(n) = A085653(n) - n.
4
5, 1, 2, 4, 2, 4, 4, 1, 3, 4, 2, 4, 4, 1, 6, 2, 2, 2, 4, 4, 1, 4, 6, 1, 2, 7, 1, 4, 1, 1, 6, 4, 1, 1, 3, 4, 4, 1, 7, 4, 1, 1, 4, 1, 3, 5, 6, 1, 1, 2, 4, 2, 6, 2, 2, 4, 1, 4, 2, 3, 5, 3, 1, 4, 4, 1, 3, 4, 5, 1, 2, 3, 5, 3, 1, 4, 5, 1, 4, 1
OFFSET
1,1
LINKS
MATHEMATICA
Table[k = n + 1; While[MoebiusMu[n] != MoebiusMu[k], k++]; k - n, {n, 105}] (* Michael De Vlieger, Sep 04 2017 *)
CROSSREFS
Cf. A008683, A085653, A123623. See A093319 for inverse.
Cf. A123623.
Sequence in context: A055185 A281409 A120579 * A085758 A154529 A352375
KEYWORD
nonn,easy
AUTHOR
Leroy Quet, Apr 26 2004
EXTENSIONS
More terms from Pab Ter (pabrlos(AT)yahoo.com), May 24 2004
STATUS
approved