login
A269340
A second sequence (see A268865) connected with negabinary expansions (cf. A039724) - see comments.
2
0, 1, 6, 0, 2, 0, 0, 1, 2, 0, 0, 3, 0, 1, 10, 0, 2, 0, 0, 3, 0, 1, 2, 0, 0, 1, 6, 0, 2, 0, 0, 1, 2, 0, 0, 3, 0, 1, 2, 0, 0, 1, 86, 0, 2, 0, 0, 3, 0, 1, 6, 0, 2, 0, 0, 1, 2, 0, 0, 3, 0, 1, 10, 0, 2, 0, 0, 3, 0, 1, 2, 0, 0, 1, 22, 0, 2, 0, 0, 3, 0, 1, 6, 0, 2, 0
OFFSET
0,3
COMMENTS
Let A_n be the Thue-Morse sequence (A010060) beginning with A010060(n). Then a(n) is defined to be the maximal number of the first terms of {1-A269027(n)} coinciding with the corresponding terms of A_n.
LINKS
Vladimir Shevelev, Two analogs of Thue-Morse sequence, arXiv:1603.04434 [math.NT], 2016.
MATHEMATICA
nn = 87; f[n_, b_] := Most@ Mod[NestWhileList[-(#1 - Mod[#1, b])/b &, n, #1 != 0 &], b]; Array[(k = 0; While[1 - Mod[Total@ f[k, 2], 2] == ThueMorse[# + k], k++]; k) &, nn - 1, 0] (* Michael De Vlieger, Aug 25 2022 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Vladimir Shevelev, Feb 24 2016
EXTENSIONS
More terms from Peter J. C. Moses, Feb 24 2016
STATUS
approved