A096397 a(n) = #{ 1<=i<=n : k(n,i)=-1 } where k(n,i) is the Kronecker symbol.

0, 0, 1, 0, 2, 0, 1, 2, 0, 1, 4, 2, 6, 1, 1, 0, 8, 3, 8, 4, 6, 4, 8, 4, 0, 3, 9, 6, 14, 2, 9, 8, 10, 6, 10, 0, 18, 6, 6, 8, 20, 4, 21, 10, 12, 9, 18, 8, 0, 9, 14, 12, 26, 8, 11, 12, 18, 13, 26, 8, 30, 11, 17, 0, 24, 6, 34, 16, 22, 10, 28, 12, 36, 13, 18, 18, 30, 10, 28, 16, 0, 18, 39, 12, 32

Offset

1,5

Comments

a(A096398(n)) = 0; a(n) = A000010(n) - A096396(n) = A096396(n) - A071961(n). [Reinhard Zumkeller, Mar 24 2012]

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Prog

(PARI) a(n)=sum(i=1, n, if(kronecker(n, i)+1, 0, 1))

Crossrefs

Cf. A000010, A051953.

Sequence in context: A058685 A351637 A029300 * A337547 A291969 A321434

Adjacent sequences: A096394 A096395 A096396 * A096398 A096399 A096400

Keyword

nonn

Author

Benoit Cloitre, Aug 06 2004

Status

approved