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

1, 2, 4, 8, 16, 32, 55, 110, 121, 332, 664, 1130, 2431, 4862, 7348, 12221, 24442, 46886, 133354, 266708, 1093378, 2027159, 4054318, 12459749, 37057240, 74114480, 81525928, 110341187, 220682374, 642750611, 759178117, 876937295, 1606524988, 10422590237, 20845180474, 62929698521, 84558995506

Offset: 1

Author

Nicholas M. R. Frieler, Jul 17 2024

Keywords

• nonn
• base
• easy

Examples

			a(12) = a(11) + rotate(a(11), 11) = 1130 + rotate(1130, 11) = 1130 + 1301 = 2431.
		

Crossrefs

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

Programs

Mathematica

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