A033064 Numbers whose base-13 representation Sum_{i=0..m} d(i)*13^i has odd d(i) for all odd i.

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 16, 18, 20, 22, 24, 27, 29, 31, 33, 35, 37, 40, 42, 44, 46, 48, 50, 53, 55, 57, 59, 61, 63, 66, 68, 70, 72, 74, 76, 79, 81, 83, 85, 87, 89, 92, 94, 96, 98, 100, 102, 105, 107, 109, 111, 113, 115, 118

Offset

1,2

Links

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

Mathematica

Select[Range[150], AllTrue[Take[IntegerDigits[#, 13], {2, -1, 2}], OddQ]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Nov 13 2020 *)

Crossrefs

Sequence in context: A032519 A221912 A008730 * A246074 A130225 A096902

Adjacent sequences: A033061 A033062 A033063 * A033065 A033066 A033067

Keyword

nonn,base

Author

Clark Kimberling

Status

approved