login
A045084
Numbers whose base-4 representation contains exactly four 0's and three 3's.
1
12303, 12339, 12348, 12483, 12492, 12528, 13059, 13068, 13104, 13248, 15363, 15372, 15408, 15552, 16128, 16447, 16591, 16627, 16636, 17167, 17203, 17212, 17347, 17356, 17392, 19471, 19507, 19516, 19651, 19660
OFFSET
1,1
LINKS
MAPLE
Res:= NULL:
for d from 7 to 8 do
for i from 0 to d-7 do
L:= [0$4, 3$3, 1$i, 2$(d-7-i)];
P:= remove(t -> t[-1]=0, combinat:-permute(L));
Res:= Res, op(map(t -> add(t[i]*4^(i-1), i=1..d), P));
od od:
sort([Res]); # Robert Israel, Feb 27 2018
MATHEMATICA
Select[Range[20000], DigitCount[#, 4, 0]==4&&DigitCount[#, 4, 3]==3&] (* Harvey P. Dale, Sep 22 2024 *)
CROSSREFS
Cf. A007090.
Sequence in context: A205359 A061745 A251776 * A250856 A242716 A077186
KEYWORD
nonn,base
STATUS
approved