A359583 Parity of A329697.

0, 0, 1, 0, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 1, 0, 1, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0

Offset

1

Links

Antti Karttunen, Table of n, a(n) for n = 1..100000

Index entries for characteristic functions

Formula

a(n) = A000035(A329697(n)).

Prog

(PARI)
A329697(n) = if(!bitand(n, n-1), 0, 1+A329697(n-(n/vecmax(factor(n)[, 1]))));
A359583(n) = (A329697(n)%2);

Crossrefs

Characteristic function of A359584, whose complement A359585 gives the positions of 0's.

Cf. A000035, A329697, A359581.

Sequence in context: A095907 A056051 A143541 * A344120 A090173 A214090

Adjacent sequences: A359580 A359581 A359582 * A359584 A359585 A359586

Keyword

nonn

Author

Antti Karttunen, Jan 07 2023

Status

approved