%I #21 Oct 16 2023 18:01:10
%S 3630,5946,5958,6990,9858,10878,15114,18006,18018,34398,61362,90894,
%T 90906,93894,93906,124974,153018,178560,457920,1188000,3529440,
%U 9776160,26028000,69107040,187267680,478980000,1268710560,4065625440,10164078720,25833761280
%N Aliquot sequence starting at 3630.
%H T. D. Noe, <a href="/A143930/b143930.txt">Table of n, a(n) for n = 0..2624</a> [complete sequence from Varona data file "SQ3630-to-1"]
%H Manuel Benito, Wolfgang Creyaufmüller, Juan L. Varona, and Paul Zimmermann, <a href="https://projecteuclid.org/euclid.em/1062621215">Aliquot Sequence 3630 Ends After Reaching 100 Digits</a>, Experimental Mathematics, Vol. 11, No. 2, 2002, pp. 201-206.
%H Juan L. Varona, <a href="http://www.unirioja.es/cu/jvarona/aliquot.html">Aliquot Sequences</a>
%F a(n+1) = A001065(a(n)). - _R. J. Mathar_, Oct 11 2017
%t NestList[DivisorSigma[1,#]-#&,3630,50] (* _Paolo Xausa_, Oct 16 2023 *)
%Y Cf. A001065.
%K nonn,fini,full,look
%O 0,1
%A _N. J. A. Sloane_, Nov 30 2008
|