|
%I #8 Dec 27 2021 19:09:58
%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
%N a(n+1) = a(n) + rotate( a(n), 1 digit right).
%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 *)
%K nonn,base,easy
%O 1,2
%A Armand Turpel armandt(AT)unforgettable.com
|
