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

%I #14 Jul 25 2024 18:18:24

%S 1,2,4,8,16,77,154,569,1525,6677,14344,55778,141355,655490,721039,

%T 1693142,3862456,10248701,21273571,33400928,116741020,128415122,

%U 341256634,775382297,1552920526,7708212578,16479033835,68126937218,154939630939,1070433594032

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

%H Harvey P. Dale, <a href="/A051300/b051300.txt">Table of n, a(n) for n = 1..1000</a>

%t NestList[#+FromDigits[RotateRight[IntegerDigits[#]]]&,1,30] (* _Harvey P. Dale_, Dec 27 2021 *)

%Y Cf. A051299.

%K nonn,base,easy

%O 1,2

%A Armand Turpel armandt(AT)unforgettable.com