%I A023725
%S A023725 0,2,3,4,10,12,13,14,15,17,18,19,20,22,23,24,50,52,53,54,60,
%T A023725 62,63,64,65,67,68,69,70,72,73,74,75,77,78,79,85,87,88,89,90,
%U A023725 92,93,94,95,97,98,99,100,102,103,104,110,112,113,114,115,117
%N A023725 Numbers with no 1's in base 5 expansion.
%t A023725 Select[ Range[ 0, 125 ], (Count[ IntegerDigits[ #, 5 ], 1 ]==0)& ]
%Y A023725 Sequence in context: A082866 A085701 A051627 this_sequence A076079 A134170 
               A049548
%Y A023725 Adjacent sequences: A023722 A023723 A023724 this_sequence A023726 A023727 
               A023728
%K A023725 nonn,base,easy
%O A023725 1,2
%A A023725 Olivier Gerard (olivier.gerard(AT)gmail.com)