|
%I #14 Mar 27 2022 13:18:13
%S 1,2,3,4,45,46,47,66,67,68,69,85,86,87,88,89,145,146,147,148,149,168,
%T 169,186,187,188,189,225,226,227,265,266,267,268,269,306,307,308,309,
%U 325,326,327,328,329,370,371,408,409,490,491
%N Numbers whose base-5 and base-6 expansions have the same digit sum.
%H Harvey P. Dale, <a href="/A037322/b037322.txt">Table of n, a(n) for n = 1..1000</a>
%F {n: A053824(n) = A053827(n).} - _R. J. Mathar_, Jun 30 2021
%t Select[Range[500],Total[IntegerDigits[#,5]]==Total[IntegerDigits[#,6]]&] (* _Harvey P. Dale_, Mar 27 2022 *)
%K nonn,base
%O 1,2
%A _Clark Kimberling_
|
