OFFSET
0,2
COMMENTS
LINKS
Peter J. C. Moses (terms 0..999) & Antti Karttunen, Table of n, a(n) for n = 0..8256
Vladimir Shevelev, Two analogs of Thue-Morse sequence, arXiv:1603.04434 [math.NT], 2016.
FORMULA
Other identities. For all n >= 0:
A268383(a(n)) = n.
EXAMPLE
In binary representation 19=10011 has an even number (two) of runs of 1's. So, 19 is a member.
MATHEMATICA
balancedBinary:=Join[#, {0}]-Join[{0}, #]&[IntegerDigits[#, 2]]&;
Flatten[Position[Map[Mod[Count[balancedBinary[#], 1], 2]&, Range[0, 100]], 0, 1]-1] (* Peter J. C. Moses, Feb 04 2016 *)
PROG
(Python)
A268412_list = [i for i in range(10**6) if not len(list(filter(bool, format(i, 'b').split('0')))) % 2] # Chai Wah Wu, Mar 01 2016
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Vladimir Shevelev, Feb 04 2016
EXTENSIONS
More terms from Peter J. C. Moses, Feb 04 2016
STATUS
approved