|
%I #14 Apr 24 2021 20:48:30
%S 91,739,811,819,821,822,823,824,825,826,827,829,838,847,856,865,874,
%T 883,901,982,1063,1144,1225,1306,1387,1549,2278,3007,3736,4465,5194,
%U 5923,6571,6643,6651,6653,6654,6655,6656,6657,6658
%N Numbers having three 1's in base 9.
%t Select[Range[10000],Count[IntegerDigits[#,9],1]==3&] (* _Harvey P. Dale_, Dec 03 2010 *)
%Y Cf. A007095.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
