A043729 Numbers whose number of runs in their base-2 representation is congruent to 1 mod 5.

1, 3, 7, 15, 31, 42, 63, 74, 82, 84, 86, 90, 106, 127, 138, 146, 148, 150, 154, 162, 164, 166, 168, 172, 174, 178, 180, 182, 186, 202, 210, 212, 214, 218, 234, 255, 266, 274, 276, 278, 282, 290, 292, 294, 296, 300, 302, 306, 308, 310, 314, 322, 324, 326, 328, 332, 334, 336

Offset

1,2

Links

Paolo Xausa, Table of n, a(n) for n = 1..10000

Mathematica

A043729Q[k_] := Mod[Length[Split[IntegerDigits[k, 2]]], 5] == 1;
Select[Range[500], A043729Q] (* Paolo Xausa, Oct 29 2025 *)

Crossrefs

Cf. A007088, A005811.

Sequence in context: A275531 A275532 A212315 * A389515 A331503 A137170

Adjacent sequences: A043726 A043727 A043728 * A043730 A043731 A043732

Keyword

nonn,base

Author

Clark Kimberling

Extensions

More terms from Paolo Xausa, Oct 29 2025

Status

approved