A044837 Positive integers having more base-11 runs of even length than odd.

12, 24, 36, 48, 60, 72, 84, 96, 108, 120, 1452, 1464, 1476, 1488, 1500, 1512, 1524, 1536, 1548, 1560, 1572, 2904, 2916, 2928, 2940, 2952, 2964, 2976, 2988, 3000, 3012, 3024, 4356, 4368, 4380, 4392, 4404, 4416, 4428, 4440

Offset

1,1

Links

Table of n, a(n) for n=1..40.

Mathematica

mb11Q[n_]:=Total[If[EvenQ[Length[#]], 1, -1]&/@Split[IntegerDigits[n, 11]]]>0; Select[Range[4500], mb11Q] (* Harvey P. Dale, Jun 03 2020 *)

Crossrefs

Sequence in context: A044897 A008594 A033024 * A033009 A140470 A141766

Adjacent sequences: A044834 A044835 A044836 * A044838 A044839 A044840

Keyword

nonn,base

Author

Clark Kimberling

Status

approved