login
A043724
Numbers whose number of runs in the base-2 representation is congruent to 0 mod 4.
3
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
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
KEYWORD
nonn,base
STATUS
approved