A223910 Numbers for which the maximal run of 1's in their binary representation contains even number of 1's.

0, 3, 6, 11, 12, 13, 15, 19, 22, 24, 25, 26, 27, 30, 35, 38, 43, 44, 45, 47, 48, 49, 50, 51, 52, 53, 54, 60, 61, 63, 67, 70, 75, 76, 77, 79, 83, 86, 88, 89, 90, 91, 94, 96, 97, 98, 99, 100, 101, 102, 104, 105, 106, 107, 108, 109, 111, 120, 121, 122, 123, 126

Offset

1,2

Comments

We call these numbers "maxevil". The sequence is complement to A223909.

If a(n) is in the sequence, then 2^k*a(n) is in the sequence. If a(n)==0 (mod 4) is in the sequence, then a(n)+1 is in the sequence. If a(n)==0 (mod 8) is in the sequence, then a(n)+1, a(n)+2 are in the sequence. If a(n)==0 (mod 16) is in the sequence, then numbers a(n)+i, i<=6, are in the sequence.

Links

Peter J. C. Moses, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[0, 200], EvenQ[Max[Map[Count[#, 1]&, Split[IntegerDigits[#, 2]]]]]&] (* Peter J. C. Moses, Mar 29 2013 *)

Crossrefs

Cf. A223909, A000069, A001969.

Sequence in context: A256108 A028744 A028775 * A022155 A066157 A073159

Adjacent sequences: A223907 A223908 A223909 * A223911 A223912 A223913

Keyword

nonn,base

Author

Vladimir Shevelev, Mar 29 2013

Status

approved