A135125 Numbers such that the digital sum base 2 and the digital sum base 5 and the digital sum base 10 all are equal.
1, 1300, 1301, 5010, 5011, 7102, 7103, 10050, 10051, 10235, 11135, 12250, 12251, 14015, 16102, 16103, 20060, 20061, 20206, 20207, 23230, 23231, 32012, 32013, 32302, 32303, 32410, 32411, 44000, 44001, 45010, 45011, 50012, 50013, 50300
Offset: 1
Examples
a(2)=1300, since ds_2(1300)=ds_5(1300)=ds_10(1300), where ds_x=digital sum base x.
Links
- G. C. Greubel, Table of n, a(n) for n = 1..989
Crossrefs
Programs
-
Mathematica
Select[Range[10000], Total[IntegerDigits[#, 2]] == Total[IntegerDigits[#, 5]] == Total[IntegerDigits[#, 10]] &] (* G. C. Greubel, Sep 27 2016 *)