A051300 a(n) = a(n-1) + rotate( a(n-1), 1 digit right), a(1) = 1.

1, 2, 4, 8, 16, 77, 154, 569, 1525, 6677, 14344, 55778, 141355, 655490, 721039, 1693142, 3862456, 10248701, 21273571, 33400928, 116741020, 128415122, 341256634, 775382297, 1552920526, 7708212578, 16479033835, 68126937218, 154939630939, 1070433594032

Offset: 1

Author

Armand Turpel armandt(AT)unforgettable.com

Keywords

• nonn
• base
• easy

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A051299.

Programs

Mathematica

NestList[#+FromDigits[RotateRight[IntegerDigits[#]]]&,1,30] (* Harvey P. Dale, Dec 27 2021 *)