|
|
A135126
|
|
Numbers such that the digital sums in bases 3, 4, 5 and 6 all are equal.
|
|
1
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
a(3)=188, since ds_3(188)=ds_4(188)=ds_5(188)=ds_6(188)=8, where ds_x=digital sum base x.
|
|
MATHEMATICA
|
Select[Range[3000], Total[IntegerDigits[#, 3]] == Total[IntegerDigits[#, 4]] == Total[IntegerDigits[#, 5]] == Total[IntegerDigits[#, 6]] &] (* G. C. Greubel, Sep 27 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|