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 A229527 #33 Aug 09 2025 10:03:20 %S A229527 1,3,7,15,22,27,37,48,61,69,85,99,118,129,142,150,157,171,181,192,205, %T A229527 213,220,225,235,246,259,276,292,306,316,327,340,348,364,378,397,417, %U A229527 430,438,454,468,487,507,520,528,544,558,577,597 %N A229527 Start with 1, skip (sum of digits of n) numbers, accept next number. %H A229527 Robert G. Wilson v, <a href="/A229527/b229527.txt">Table of n, a(n) for n = 1..10000</a> %H A229527 <a href="/index/Coi#Colombian">Index entries for Colombian or self numbers and related sequences</a> %F A229527 a(n+1) = a(n) + (sum of digits of a(n)) + 1. %e A229527 a(1)=1, a(2)=1+1+1=3, a(3)=3+3+1=7, a(4)=7+7+1=15, a(5)=15+1+5+1=22, a(6)=22+2+2+1=27, ... %t A229527 a[n_] := a[n] = a[n - 1] + 1 + Plus @@ IntegerDigits@a[n - 1]; a[1] = 1; Array[a, 50] (* _Robert G. Wilson v_, Aug 01 2018 *) %o A229527 (Python) %o A229527 from itertools import islice %o A229527 def A229527_gen(): # generator of terms %o A229527 a = 1 %o A229527 while True: %o A229527 yield a %o A229527 a += sum(map(int,str(a)))+1 %o A229527 A229527_list = list(islice(A229527_gen(),40)) # _Chai Wah Wu_, Aug 09 2025 %Y A229527 Cf. A007953, A007612, A004207, A160939. %K A229527 nonn,base %O A229527 1,2 %A A229527 _Dave Durgin_, Sep 25 2013