A135126 Numbers such that the digital sums in bases 3, 4, 5 and 6 all are equal.
1, 2, 188, 668, 908, 1388, 1628, 2170, 2171, 2830, 2831, 3908, 4330, 4331, 6490, 6491, 8650, 8651, 10390, 10391, 10629, 12792, 12793, 12794, 17110, 17111, 17290, 17291, 25930, 25931, 36312, 36313, 36314, 37812, 37813, 37814, 41532, 41533, 41534
Offset: 1
Examples
a(3)=188, since ds_3(188)=ds_4(188)=ds_5(188)=ds_6(188)=8, where ds_x=digital sum base x.
Links
- G. C. Greubel, Table of n, a(n) for n = 1..1400
Crossrefs
Programs
-
Mathematica
Select[Range[3000], Total[IntegerDigits[#, 3]] == Total[IntegerDigits[#, 4]] == Total[IntegerDigits[#, 5]] == Total[IntegerDigits[#, 6]] &] (* G. C. Greubel, Sep 27 2016 *)