OFFSET
1,2
EXAMPLE
a(12) = a(11) + rotate(a(11), 11) = 14443 + rotate(14443, 11) = 14443 + 31444 = 45887.
MATHEMATICA
a[1] = 1; a[n_] := a[n] = a[n - 1] + FromDigits@RotateRight[IntegerDigits[a[n - 1]], n - 1]; arr = a[#] & /@ Range[1, 100]
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Nicholas M. R. Frieler, Jul 17 2024
STATUS
approved