A319747 a(n) = A319726(n) + A319657(n).

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

Offset

0,2

Comments

This sequence is different from A055958. For example, A055958(82) = 164 and a(82) = 100.

Links

Seiichi Manyama, Table of n, a(n) for n = 0..6560

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

Base b: A319785 (b=2), this sequence (b=9), A052008 (b=10).

Cf. A055958, A165110, A319657, A319726.

Sequence in context: A247427 A316837 A076428 * A055958 A241142 A271907

Adjacent sequences: A319744 A319745 A319746 * A319748 A319749 A319750

Keyword

nonn,base,look

Author

Seiichi Manyama, Sep 27 2018

Status

approved