A043702 Numbers whose base-13 representation has an even number of runs.

13, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 71, 72, 73, 74, 75, 76, 77

Offset

1,1

Links

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

Mathematica

Select[Range[100], EvenQ[Length[Split[IntegerDigits[#, 13]]]]&] (* Harvey P. Dale, Aug 22 2015 *)

Crossrefs

Sequence in context: A229957 A070640 A043657 * A278978 A212908 A180642

Adjacent sequences: A043699 A043700 A043701 * A043703 A043704 A043705

Keyword

nonn,base

Author

Clark Kimberling

Status

approved