A372554 a(n) = A050602(n, 2n+1).

0, 2, 0, 2, 0, 4, 2, 2, 0, 2, 0, 4, 2, 3, 2, 2, 0, 2, 0, 2, 0, 6, 4, 4, 2, 2, 2, 3, 2, 3, 2, 2, 0, 2, 0, 2, 0, 4, 2, 2, 0, 2, 0, 6, 4, 4, 4, 4, 2, 2, 2, 2, 2, 5, 3, 3, 2, 2, 2, 3, 2, 3, 2, 2, 0, 2, 0, 2, 0, 4, 2, 2, 0, 2, 0, 4, 2, 3, 2, 2, 0, 2, 0, 2, 0, 8, 6, 6, 4, 4, 4, 4, 4, 4, 4, 4, 2, 2, 2, 2, 2, 4, 2, 2, 2, 2

Offset

0,2

Links

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

Index entries for sequences related to binary expansion of n

Prog

(PARI)
A050602sq(x, y) = if(!bitand(x, y), 0, 1+A050602sq(bitxor(x, y), 2*bitand(x, y)));
A372554(n) = A050602sq(n, n+n+1);

Crossrefs

Cf. A022340 (positions of 0's), A050602.

Cf. A002450 (seems to give the positions of records).

Cf. also A329603.

Sequence in context: A238763 A029186 A283023 * A288182 A072680 A067770

Adjacent sequences: A372551 A372552 A372553 * A372555 A372556 A372557

Keyword

nonn

Author

Antti Karttunen, May 05 2024

Status

approved