login
Numbers whose base-5 representation contains exactly three 0's and no 2's.
0

%I #18 Feb 04 2023 10:16:52

%S 125,375,500,626,628,629,630,640,645,650,700,725,750,1000,1125,1876,

%T 1878,1879,1880,1890,1895,1900,1950,1975,2000,2250,2375,2501,2503,

%U 2504,2505,2515,2520,2525,2575,2600,2625,2875,3000

%N Numbers whose base-5 representation contains exactly three 0's and no 2's.

%t okQ[n_]:=Module[{dc5=DigitCount[n,5]},dc5[[5]]==3&&dc5[[2]]==0]

%t Select[Range[3000],okQ] (* _Harvey P. Dale_, Dec 23 2010 *)

%Y Cf. A007091.

%K nonn,base

%O 1,1

%A _Clark Kimberling_