|
%I #11 Jun 30 2021 12:10:10
%S 1,2,3,4,5,6,91,92,93,94,95,133,134,135,176,177,178,179,180,181,217,
%T 218,219,220,221,222,223,259,260,261,262,263,304,305,306,307,385,386,
%U 387,388,389,390,391,432,433,472,473,474,475,553
%N Numbers whose base-7 and base-8 expansions have the same digit sum.
%F {n: A053828(n) = A053829(n).} - _R. J. Mathar_, Jun 30 2021
%t Select[Range[600],Total[IntegerDigits[#,7]]==Total[IntegerDigits[#,8]]&] (* _Harvey P. Dale_, Sep 05 2015 *)
%K nonn,base
%O 1,2
%A _Clark Kimberling_
|
