login
A043381
Numbers having one 3 in base 6.
1
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
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
KEYWORD
nonn,base
STATUS
approved