1,1
Select[ Range[ 9153 ], (Count[ IntegerDigits[ #, 3 ], 1 ]==7)& ]
Sequence in context: A091673 A096082 A138698 this_sequence A038469 A077816 A001220
Adjacent sequences: A023695 A023696 A023697 this_sequence A023699 A023700 A023701
nonn,base,easy
Olivier Gerard (olivier.gerard(AT)gmail.com)
Search completed in 0.002 seconds