login
Numbers whose base-6 and base-8 expansions have the same digit sum.
0

%I #10 Jun 21 2021 02:47:52

%S 1,2,3,4,5,40,41,72,73,74,75,76,77,112,113,144,145,146,147,148,149,

%T 184,185,464,465,466,467,534,535,570,571,572,573,574,575,606,607,672,

%U 673,674,675,676,677,708,709,710,711,744,745,746

%N Numbers whose base-6 and base-8 expansions have the same digit sum.

%t Select[Range[1000],Total[IntegerDigits[#,6]]==Total[IntegerDigits[ #,8]]&] (* _Harvey P. Dale_, Jul 22 2011 *)

%K nonn,base

%O 1,2

%A _Clark Kimberling_