1,1
Select[ Range[ 800 ], (Count[ IntegerDigits[ #, 5 ], 1 ]==3)& ]
Sequence in context: A065403 A035502 A043355 this_sequence A045259 A045244 A045229
Adjacent sequences: A023725 A023726 A023727 this_sequence A023729 A023730 A023731
nonn,base,easy
Olivier Gerard (olivier.gerard(AT)gmail.com)
Search completed in 0.002 seconds