login
A023702
Numbers with exactly 4 2's in their ternary expansion of n.
4
80, 161, 188, 215, 224, 233, 236, 239, 240, 241, 323, 404, 431, 458, 467, 476, 479, 482, 483, 484, 512, 539, 548, 557, 560, 563, 564, 565, 593, 620, 629, 638, 641, 644, 645, 646, 656, 665, 668, 671, 672, 673, 683, 692, 695
OFFSET
1,1
LINKS
MATHEMATICA
Select[ Range[ 729 ], (Count[ IntegerDigits[ #, 3 ], 2 ]==4)& ]
Select[Range[700], DigitCount[#, 3, 2]==4&] (* Harvey P. Dale, Oct 10 2024 *)
CROSSREFS
Sequence in context: A371150 A295593 A043332 * A031460 A044993 A043486
KEYWORD
nonn,base,easy
STATUS
approved