A044897 Base 11 run lengths alternate: even, odd, even,...

12, 24, 36, 48, 60, 72, 84, 96, 108, 120, 132, 134, 135, 136, 137, 138, 139, 140, 141, 142, 264, 265, 267, 268, 269, 270, 271, 272, 273, 274, 396, 397, 398, 400, 401, 402, 403, 404, 405, 406, 528, 529, 530, 531, 533, 534, 535

Offset

1,1

Links

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

Mathematica

rla11Q[n_]:=Module[{a=Boole[EvenQ/@(Length/@Split[IntegerDigits[n, 11]])]}, a == PadRight[{}, Length[a], {1, 0}]]; Select[Range[600], rla11Q] (* Harvey P. Dale, Jul 24 2017 *)

Crossrefs

Sequence in context: A270571 A044852 A121578 * A008594 A033024 A044837

Adjacent sequences: A044894 A044895 A044896 * A044898 A044899 A044900

Keyword

nonn,base

Author

Clark Kimberling

Status

approved