1,1
Select[ Range[ 729 ], (Count[ IntegerDigits[ #, 3 ], 2 ]==4)& ]
Sequence in context: A107931 A134769 A043332 this_sequence A031460 A044993 A043486
Adjacent sequences: A023699 A023700 A023701 this_sequence A023703 A023704 A023705
nonn,base,easy
Olivier Gerard (olivier.gerard(AT)gmail.com)
Search completed in 0.002 seconds