A089495 a(n) = mu(prime(n)+1), where mu is the Moebius function.

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

Offset

1,1

Links

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

Eric Weisstein's World of Mathematics, Moebius Function

Mathematica

Table[MoebiusMu[Prime[n]+1], {n, 150}]

Crossrefs

Cf. A049098 (primes p such that mu(p+1) = 0), A078329 (primes p such that mu(p+1) = -1), A089523 (primes p such that mu(p+1) = 1), A089451 (mu(p-1) for prime p), A089496 (mu(p+1)+mu(p-1) for prime p), A089497 (mu(p+1)-mu(p-1) for prime p).

A067461(n) - 1.

Sequence in context: A320841 A351725 A243148 * A345703 A365807 A173857

Adjacent sequences: A089492 A089493 A089494 * A089496 A089497 A089498

Keyword

sign

Author

T. D. Noe, Nov 04 2003

Status

approved