1,1
Select[ Range[ 500 ], (Count[ IntegerDigits[ #, 5 ], 4 ]==2)& ]
Adjacent sequences: A023736 A023737 A023738 this_sequence A023740 A023741 A023742
Sequence in context: A042138 A042136 A043366 this_sequence A031475 A045204 A044101
nonn,base,easy
Olivier Gerard (olivier.gerard(AT)gmail.com)
Search completed in 0.002 seconds