login
Sort then Add, a(1)=3.
1

%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_