|
|
A102861
|
|
Numbers which in base 5 have digit-sum 4.
|
|
1
|
|
|
4, 8, 12, 16, 20, 28, 32, 36, 40, 52, 56, 60, 76, 80, 100, 128, 132, 136, 140, 152, 156, 160, 176, 180, 200, 252, 256, 260, 276, 280, 300, 376, 380, 400, 500, 628, 632, 636, 640, 652, 656, 660, 676, 680, 700, 752, 756, 760, 776, 780, 800, 876, 880, 900, 1000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Or, sums of four powers of 5.
|
|
LINKS
|
|
|
FORMULA
|
The author would like a formula for the n-th term.
|
|
EXAMPLE
|
In base 5 the numbers are 4, 13, 31, 40, 103, 112, 121, 130, 202, 211, 220, 301, 310, 400, 1003, ...
|
|
MAPLE
|
for n from 0 to 2500 do if coeff(series(add(x^(5^i), i=0..4)^4, x, 2500), x, n)<>0 then printf(`%d, `, n); fi:od:
|
|
MATHEMATICA
|
Select[Range[1000], Total[IntegerDigits[#, 5]]==4&] (* Harvey P. Dale, Jul 13 2023 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
Sergi Adamchuk (adamchuk(AT)gmail.com), Mar 15 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|