1,1
Select[ Range[ 729 ], (Count[ IntegerDigits[ #, 3 ], 2 ]==4)& ]
Sequence in context: A107931 A134769 A043332 this_sequence A031460 A044993 A043486
Adjacent sequences: A023699 A023700 A023701 this_sequence A023703 A023704 A023705
nonn,base,easy
Olivier Gerard (ogerard(AT)ext.jussieu.fr)
Search completed in 0.002 seconds