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

%I #12 Jul 25 2024 18:18:05

%S 1,2,4,8,16,77,154,695,1651,8162,9790,17699,94690,141599,557590,

%T 1133495,2468446,7152908,8681995,15501953,70521484,75736331,133099648,

%U 464096129,1105057423,2155631654,3711948196,10831430159,19145731750,110603049251,216633541762

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

%t NestList[#+FromDigits[RotateLeft[IntegerDigits[#]]]&,1,40] (* _Harvey P. Dale_, Jun 29 2017 *)

%Y Cf. A051300.

%K nonn,base,easy

%O 1,2

%A Armand Turpel armandt(AT)unforgettable.com

%E More terms from _Harvey P. Dale_, Jun 29 2017