%I #9 Jun 09 2021 23:22:23
%S 0,2,4,6,8,10,12,14,16,18,11,22,33,44,55,66,77,88,99,110,22,33,44,55,
%T 66,77,88,99,110,121,33,44,55,66,77,88,99,110,121,132,44,55,66,77,88,
%U 99,110,121,132,143,55,66,77,88,99,110,121,132,143,154,66,77,88
%N a(n) = n + A345110(n).
%C First differs from both A052008 and A056964 at n = 101.
%e For n = 101: 101 + A345110(101) = 101 + 11 = 112, so a(101) = 112.
%t Array[#+FromDigits@RotateLeft@IntegerDigits@#&,100,0] (* _Giorgos Kalogeropoulos_, Jun 09 2021 *)
%o (PARI) eva(n) = subst(Pol(n), x, 10)
%o rot(vec) = if(#vec < 2, return(vec)); my(s=concat(Str(2), ".."), v=[]); s=concat(s, Str(#vec)); v=vecextract(vec, s); v=concat(v, vec[1]); v
%o a(n) = n + eva(rot(digits(n)))
%o (Python)
%o def rotl(s): return s[1:] + s[0]
%o def a(n): return n + int(rotl(str(n)))
%o print([a(n) for n in range(63)]) # _Michael S. Branicky_, Jun 09 2021
%Y Cf. A052008, A056964, A345110, A345112, A345113, A345114, A345115.
%K nonn,base,easy
%O 0,2
%A _Felix Fröhlich_, Jun 09 2021