|
| |
| |
|
|
|
0, 2, 4, 6, 8, 10, 12, 14, 16, 10, 20, 30, 40, 50, 60, 70, 80, 90, 20, 30, 40, 50, 60, 70, 80, 90, 100, 30, 40, 50, 60, 70, 80, 90, 100, 110, 40, 50, 60, 70, 80, 90, 100, 110, 120, 50, 60, 70, 80, 90, 100, 110, 120, 130, 60, 70, 80, 90, 100, 110, 120, 130, 140, 70
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
COMMENTS
|
This sequence is different from A055958. For example, A055958(82) = 164 and a(82) = 100.
|
|
|
LINKS
|
|
|
|
MATHEMATICA
|
Table[FromDigits[Reverse[#], 9] + FromDigits[#, 9] & [Sort[IntegerDigits[n, 9]]], {n, 0, 100}] (* Paolo Xausa, Aug 08 2024 *)
|
|
|
PROG
|
(PARI) a(n) = my(dn=digits(n, 9)); fromdigits(vecsort(dn), 9) + fromdigits(vecsort(dn, , 4), 9); \\ Michel Marcus, Sep 28 2018
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
