OFFSET
1,5
COMMENTS
a(n) is the degree of the n-th Stern polynomial defined in Beck and Dilcher. - Michel Marcus, May 20 2022
LINKS
George Beck and Karl Dilcher, A Matrix Related to Stern Polynomials and the Prouhet-Thue-Morse Sequence, arXiv:2106.10400 [math.CO], 2021.
R. Brown and J. L. Merzel, The number of Ducci sequences with a given period, Fib. Quart., 45 (2007), 115-121.
MAPLE
a:= n-> Bits[And](n, n-1)/2:
seq(a(n), n=1..100); # Alois P. Heinz, May 20 2022
PROG
(PARI) a(n) = bitand(n, n-1)/2; \\ Michel Marcus, Sep 06 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, May 25 2008
STATUS
approved