A374732 a(n) = a(n-1) + rotate(a(n-1), n-1 digits right) with a(1) = 1.

1, 2, 4, 8, 16, 77, 154, 569, 1264, 5390, 14443, 45887, 133345, 646679, 1443145, 6587459, 12553333, 43808666, 110246752, 321271427, 594484141, 736078625, 1598652232, 3920250884, 4804642909, 9095590955, 15005150050, 65055300101, 95065465156, 149717034662

Offset: 1

Author

Nicholas M. R. Frieler, Jul 17 2024

Keywords

• nonn
• base
• easy

Examples

			a(12) = a(11) + rotate(a(11), 11) = 14443 + rotate(14443, 11) = 14443 + 31444 = 45887.
		

Crossrefs

Cf. A001127, A051300, A051299, A374731, A374733, A374734.

Programs

Mathematica

a[1] = 1; a[n_] := a[n] = a[n - 1] + FromDigits@RotateRight[IntegerDigits[a[n - 1]], n - 1]; arr = a[#] & /@ Range[1, 100]