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 A153824 #14 Sep 08 2022 08:45:40 %S A153824 0,0,1,6,36,240,1698,14304,118800,1118160,11705288,144092256, %T A153824 1738439808,24817158912,355309325280,5378578601760,86081749397280, %U A153824 1570394279039040,28281459220193088,572031558109589760,11458497230555094720 %N A153824 Sum of proper divisors of n!: a(n) = sigma(n!) - n!. %C A153824 a(n) is the sum of proper divisors of factorial number A000142(n). %H A153824 G. C. Greubel, <a href="/A153824/b153824.txt">Table of n, a(n) for n = 0..500</a> %F A153824 a(n) = A000203(n!) - n! = A062569(n) - A000142(n) = A001065(A000142(n)). %p A153824 with(numtheory): seq(sigma(factorial(n))-factorial(n), n = 0 .. 22); # _Emeric Deutsch_, Jan 07 2009 %t A153824 Table[DivisorSigma[1, n!] - n!, {n, 0, 50}] (* _G. C. Greubel_, Aug 30 2016 *) %o A153824 (Magma) [DivisorSigma(1,Factorial(n)) - Factorial(n): n in [0..20]]; // _Vincenzo Librandi_, Aug 31 2016 %o A153824 (PARI) a(n) = sigma(n!) - n!; \\ _Michel Marcus_, Aug 31 2016 %Y A153824 Cf. A000142, A000203, A001065, A062569. %K A153824 nonn %O A153824 0,4 %A A153824 _Omar E. Pol_, Jan 02 2009 %E A153824 Extended by _Emeric Deutsch_, Jan 07 2009