A044985 Numbers whose base-3 representation contains exactly four 0's and no 1's.

162, 488, 492, 504, 540, 648, 1466, 1478, 1482, 1514, 1518, 1530, 1622, 1626, 1638, 1674, 1946, 1950, 1962, 1998, 2106, 4400, 4436, 4448, 4452, 4544, 4556, 4560, 4592, 4596, 4608, 4868, 4880, 4884, 4916, 4920, 4932, 5024

Offset

1,1

Links

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

Maple

seq(op(sort(map(t -> 2*(3^n+add(3^(i-1), i=t)), combinat:-choose(n, n-4)))), n=4..7); # Robert Israel, May 01 2018

Mathematica

A044985list[upto_]:=Select[Range[upto], DigitCount[#, 3, 0]==4&&DigitCount[#, 3, 1]==0&]; A044985list[10000] (* Paolo Xausa, Aug 02 2023 *)

Crossrefs

Cf. A007089.

Sequence in context: A274027 A206210 A378654 * A302283 A186844 A319915

Adjacent sequences: A044982 A044983 A044984 * A044986 A044987 A044988

Keyword

nonn,base

Author

Clark Kimberling

Status

approved