A136613 Concatenation of (sum of digits of n) and n.

0, 11, 22, 33, 44, 55, 66, 77, 88, 99, 110, 211, 312, 413, 514, 615, 716, 817, 918, 1019, 220, 321, 422, 523, 624, 725, 826, 927, 1028, 1129, 330, 431, 532, 633, 734, 835, 936, 1037, 1138, 1239, 440, 541, 642, 743, 844, 945, 1046, 1147, 1248, 1349, 550, 651, 752

Offset: 0

Author

Reinhard Zumkeller, Jan 13 2008

Keywords

• nonn
• base
• look

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A007953, A108773, A136614.

Programs

Mathematica

a[n_]:=FromDigits[Join[{DigitSum[n]},IntegerDigits[n]]] (* James C. McMahon, May 06 2025 *)

Formula

A136614(n) = A007953(a(n)) = A007953(A108773(n)).