1,1
Select[ Range[ 3240 ], (Count[ IntegerDigits[ #, 3 ], 1 ]==6)& ]
Sequence in context: A098251 A115464 A004534 this_sequence A038468 A131348 A043471
Adjacent sequences: A023694 A023695 A023696 this_sequence A023698 A023699 A023700
nonn,base,easy
Olivier Gerard (olivier.gerard(AT)gmail.com)
Search completed in 0.002 seconds