A037312 - OEIS

%I #9 Jun 21 2021 02:50:23

%S 1,2,15,16,17,21,22,23,35,57,58,59,63,64,65,78,79,80,99,100,101,112,

%T 113,119,133,134,150,151,152,156,157,158,204,205,206,210,211,212,224,

%U 294,295,296,348,349,351,352,353,366,367,368,372

%N Numbers whose base-3 and base-7 expansions have the same digit sum.

%H Harvey P. Dale, <a href="/A037312/b037312.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Range[400],Total[IntegerDigits[#,3]]==Total[IntegerDigits[ #,7]]&] (* _Harvey P. Dale_, May 24 2012 *)

%K nonn,base

%O 1,2

%A _Clark Kimberling_