|
%I #14 Jun 30 2021 01:55:08
%S 54,87,135,168,216,249,297,330,378,411,459,487,488,489,490,491,493,
%T 494,495,504,513,522,531,549,558,573,621,654,702,744,753,762,771,780,
%U 784,785,786,787,788,790,791,798,807,816,864,897,945,978,1026,1059
%N Numbers whose base-9 representation has the same nonzero number of 0's and 6's.
%t Select[Range[1100],DigitCount[#,9,0]==DigitCount[#,9,6]>0&] (* _Harvey P. Dale_, Aug 18 2011 *)
%Y Cf. A007095.
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
