1,1
Select[ Range[ 459 ], (Count[ IntegerDigits[ #, 3 ], 1 ]==4)& ]
Sequence in context: A092613 A005930 A036194 this_sequence A038466 A063310 A092889
Adjacent sequences: A023692 A023693 A023694 this_sequence A023696 A023697 A023698
nonn,base,easy
Olivier Gerard (olivier.gerard(AT)gmail.com)
Search completed in 0.002 seconds