%I #10 Feb 03 2025 05:35:59
%S 3,6,12,24,48,96,165,321,444,888,1776,3453,6798,13587,27165,39732,
%T 63111,74247,98724,123513,235848,470436,504903,508362,531930,545289,
%U 790878,868767,1536555,2892111,4004400,4004844,4049292,4273791,5508570,5564148
%N Sort then Add, a(1)=3.
%C a(n+1) is obtained by sorting the digits of a(n) into increasing order then adding this number to a(n).
%e 96+69=165.
%p A033893 := proc(n)
%p option remember ;
%p if n =1 then
%p 3;
%p else
%p A070196(procname(n-1)) ;
%p end if;
%p end proc:
%p seq(A033893(n),n=1..100) ; # _R. J. Mathar_, Feb 03 2025
%Y Cf. A033860.
%K nonn,base,easy,changed
%O 1,1
%A _N. J. A. Sloane_, _David W. Wilson_