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 (ogerard(AT)ext.jussieu.fr)
Search completed in 0.002 seconds