This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A292218 #13 Sep 12 2017 22:58:24
%S A292218 2,8,24,64,160,285,203,266,450,538,550,642,566,488,678,958,1120,945,
%T A292218 686,1241,1032,1144,1339,1671,1229,1499,1377,1492,1945,1515,1745,2108,
%U A292218 1650,2326,2110,2106,2558,2105,2049,2548,2590,2247,2786,2750
%N A292218 The n-th iteration of (k -> k + sum of base-100 digits of k) applied to n.
%C A292218 Main diagonal of square array A(n, k), where A(n, k) gives the result of k applications of the map x -> x + sum of base-100 digits of x, starting at n. - _Felix Fröhlich_, Sep 12 2017
%e A292218 n=6: 6+6=12, 12+12=24, 24+24=48, 48+48=96, 96+96=192, 192+92+(0)1=285. After 6 iterations you get 285, so a(6)=285.
%t A292218 Table[Nest[# + Total@ IntegerDigits[#, 100] &, n, n], {n, 44}] (* _Michael De Vlieger_, Sep 11 2017 *)
%o A292218 (PARI) a(n) = my(x=n); for (k=1, n, x += vecsum(digits(x, 100))); x; \\ _Michel Marcus_, Sep 12 2017
%Y A292218 Cf. A286660, A292202.
%K A292218 nonn,base
%O A292218 1,1
%A A292218 _Peter Weiss_, Sep 11 2017