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

1, 1, 1, 2, 2, 2, 5, 2, 6, 3, 6, 2, 6, 5, 7, 8, 8, 3, 10, 4, 6, 6, 14, 4, 20, 9, 9, 6, 14, 6, 21, 8, 10, 10, 14, 12, 18, 12, 18, 8, 20, 8, 21, 10, 12, 13, 28, 8, 42, 11, 18, 12, 26, 10, 29, 12, 18, 15, 32, 8, 30, 19, 19, 32, 24, 14, 32, 16, 22, 14, 42, 12, 36, 23, 22, 18, 30, 14, 50, 16

Offset

1,4

Comments

a(n) = A000010(n) - A096397(n) = A071961(n) + A096397(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: A080348 A355198 A363924 * A029662 A077913 A069862

Adjacent sequences: A096393 A096394 A096395 * A096397 A096398 A096399

Keyword

nonn

Author

Benoit Cloitre, Aug 06 2004

Extensions

Typo in definition fixed by Reinhard Zumkeller, Mar 24 2012

Status

approved