[go: up one dir, main page]

login
A374732
a(n) = a(n-1) + rotate(a(n-1), n-1 digits right) with a(1) = 1.
3
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,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
STATUS
approved