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 A033903 #15 Feb 03 2025 05:40:18 %S A033903 27,54,99,198,387,765,1332,2565,5121,6246,8712,9990,10989,12888,25776, %T A033903 51453,64908,69597,126396,250065,252621,374877,722655,948222,1170711, %U A033903 1281888,2410776,2535453,4870008,4874796,9342585,11688174,22834962 %N A033903 Sort then Add, a(1)=27. %H A033903 Harvey P. Dale, <a href="/A033903/b033903.txt">Table of n, a(n) for n = 1..1000</a> %p A033903 A033903 := proc(n) %p A033903 option remember ; %p A033903 if n =1 then %p A033903 27; %p A033903 else %p A033903 A070196(procname(n-1)) ; %p A033903 end if; %p A033903 end proc: %p A033903 seq(A033903(n),n=1..100) ; # _R. J. Mathar_, Feb 03 2025 %t A033903 NestList[#+FromDigits[Sort[IntegerDigits[#]]]&,27,40] (* _Harvey P. Dale_, May 21 2023 *) %Y A033903 Cf. A033860. %K A033903 nonn,base,easy %O A033903 1,1 %A A033903 _N. J. A. Sloane_, _David W. Wilson_