A051299 a(n) = a(n-1) + rotate( a(n-1), 1 digit left), a(1) = 1.

1, 2, 4, 8, 16, 77, 154, 695, 1651, 8162, 9790, 17699, 94690, 141599, 557590, 1133495, 2468446, 7152908, 8681995, 15501953, 70521484, 75736331, 133099648, 464096129, 1105057423, 2155631654, 3711948196, 10831430159, 19145731750, 110603049251, 216633541762

Offset: 1

Author

Armand Turpel armandt(AT)unforgettable.com

Keywords

• nonn
• base
• easy

Crossrefs

Cf. A051300.

Programs

Mathematica

NestList[#+FromDigits[RotateLeft[IntegerDigits[#]]]&,1,40] (* Harvey P. Dale, Jun 29 2017 *)

Extensions

More terms from Harvey P. Dale, Jun 29 2017