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 A033905 #12 Feb 03 2025 05:40:37 %S A033905 31,44,88,176,343,677,1354,2699,5398,8987,16876,33554,67009,67688, %T A033905 134476,268943,503632,526988,783877,1161665,2277331,3500708,3504286, %U A033905 3738854,7084642,7329320,7552699,10109498,10224397,11447876,22894654,45340343 %N A033905 Sort then Add, a(1)=31. %H A033905 Harvey P. Dale, <a href="/A033905/b033905.txt">Table of n, a(n) for n = 1..1000</a> %p A033905 A033905 := proc(n) %p A033905 option remember ; %p A033905 if n =1 then %p A033905 31; %p A033905 else %p A033905 A070196(procname(n-1)) ; %p A033905 end if; %p A033905 end proc: %p A033905 seq(A033905(n),n=1..100) ; # _R. J. Mathar_, Feb 03 2025 %t A033905 NestList[#+FromDigits[Sort[IntegerDigits[#]]]&,31,40] (* _Harvey P. Dale_, Jul 19 2017 *) %Y A033905 Cf. A033860. %K A033905 nonn,base,easy %O A033905 1,1 %A A033905 _N. J. A. Sloane_, _David W. Wilson_