login
A044837
Positive integers having more base-11 runs of even length than odd.
0
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
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
KEYWORD
nonn,base
STATUS
approved