A367347 - OEIS

%I #21 Nov 17 2023 11:21:04

%S 1,12,33,66,132,153,184,225,277,349,442,466,530,535,590,595,650,656,

%T 722,749,846,914,963,1002,1023,1054,1095,1146,1207,1278,1359,1450,

%U 1451,1462,1483,1514,1555,1606,1667,1738,1819,1910,1911,1922,1943,1974,2015,2067,2139,2231,2243,2275,2327,2399

%N a(1) = 1; thereafter, a(n+1) = a(n) + x + 10*y, where x and y are respectively the first and last digits of a(n).

%C This sequence and A367348 are simple models for the Commas sequence A121805.

%H N. J. A. Sloane, <a href="/A367347/b367347.txt">Table of n, a(n) for n = 1..20000</a>

%F a(888508) = A367348(837058) = 40000026, so a(888508+i) = A367348(837058+i) for i >= 0. - _Michael S. Branicky_, Nov 17 2023

%t NestList[#+First[IntegerDigits[#]]+10Mod[#,10]&,1,100] (* _Paolo Xausa_, Nov 17 2023 *)

%o (Python)

%o from itertools import islice

%o def agen(): # generator of terms

%o     an = 1

%o     while True:

%o         yield an

%o         s = str(an)

%o         an += int(s[0]) + 10*int(s[-1])

%o print(list(islice(agen(), 55))) # _Michael S. Branicky_, Nov 17 2023

%Y Cf. A121805, A367348.

%K nonn,base

%O 1,2

%A _N. J. A. Sloane_, Nov 16 2023