|
|
A044985
|
|
Numbers whose base-3 representation contains exactly four 0's and no 1's.
|
|
1
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|