1,2
Select[ Range[ 0, 200 ], (Count[ IntegerDigits[ #, 4 ], 1 ]==0)& ]
Sequence in context: A019307 A028742 A028771 this_sequence A047474 A005454 A119187
Adjacent sequences: A023706 A023707 A023708 this_sequence A023710 A023711 A023712
nonn,base,easy
Olivier Gerard (ogerard(AT)ext.jussieu.fr)
Search completed in 0.002 seconds