A043724 Numbers whose number of runs in the base-2 representation is congruent to 0 mod 4.

10, 18, 20, 22, 26, 34, 36, 38, 40, 44, 46, 50, 52, 54, 58, 66, 68, 70, 72, 76, 78, 80, 88, 92, 94, 98, 100, 102, 104, 108, 110, 114, 116, 118, 122, 130, 132, 134, 136, 140, 142, 144, 152, 156, 158, 160, 170, 176, 184, 188, 190, 194, 196, 198, 200, 204, 206

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Select[Range[200], Divisible[Length[Split[IntegerDigits[#, 2]]], 4]&] (* Harvey P. Dale, May 21 2012 *)

Prog

(PARI) isok(k) = (hammingweight(bitxor(k, k>>1)) % 4) == 0; \\ Michel Marcus, Oct 04 2023

Crossrefs

Cf. A005811.

Sequence in context: A087141 A349090 A178461 * A043571 A043732 A043737

Adjacent sequences: A043721 A043722 A043723 * A043725 A043726 A043727

Keyword

nonn,base

Author

Clark Kimberling

Status

approved