A043381 Numbers having one 3 in base 6.

3, 9, 15, 18, 19, 20, 22, 23, 27, 33, 39, 45, 51, 54, 55, 56, 58, 59, 63, 69, 75, 81, 87, 90, 91, 92, 94, 95, 99, 105, 108, 109, 110, 112, 113, 114, 115, 116, 118, 119, 120, 121, 122, 124, 125, 132, 133, 134, 136, 137, 138, 139, 140

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

select(t -> numboccur(3, convert(t, base, 6))=1, [$1..1000]); # Robert Israel, Aug 10 2020

Mathematica

Select[Range[200], DigitCount[#, 6, 3]==1&] (* Harvey P. Dale, Oct 20 2017 *)

Crossrefs

Cf. A007092.

Sequence in context: A291347 A062220 A310328 * A100331 A155764 A259754

Adjacent sequences: A043378 A043379 A043380 * A043382 A043383 A043384

Keyword

nonn,base

Author

Clark Kimberling

Status

approved