|
%I #11 Oct 28 2017 18:28:02
%S 20,22,44,88,176,343,677,1354,2699,5398,8987,16876,33554,67009,67688,
%T 134476,268943,503632,526988,783877,1161665,2277331,3500708,3504286,
%U 3738854,7084642,7329320,7552699,10109498,10224397,11447876,22894654
%N Sort then Add!.
%F a(n)=A033905(n-1), n>2. [From _R. J. Mathar_, Oct 22 2008]
%t NestList[#+FromDigits[Sort[IntegerDigits[#]]]&,20,40] (* _Harvey P. Dale_, Oct 28 2017 *)
%Y Cf. A033860.
%K nonn,base,easy
%O 1,1
%A _N. J. A. Sloane_, _David W. Wilson_
|
