The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #18 Nov 08 2024 11:38:09
%S 8,96,960,9240,98280,997920,9979200,99459360,994593600,9777287520,
%T 97772875200,995886571680,9958865716800,99588657168000,
%U 998456601542400,9948906851083200,98930408269492800,994651672331116800,9946516723311168000,99796717790555385600
%N The n-digit number whose divisors have the maximal sum (A066410).
%e 960 is the 3-digit number the sum of whose divisors (3048) is largest.
%t a[n_] := Module[{mx=1}, For[k=10^(n-1), k<=10^n-1, k++, If[(t=DivisorSigma[1,k]) > mx, mx=t; kx=k]]; kx]; Array[a,6] (* _Stefano Spezia_, Nov 07 2024 *)
%Y Cf. A066410.
%K nonn,base
%O 1,1
%A _Harvey P. Dale_, Dec 26 2001
%E Corrected and extended by _Vladeta Jovovic_, Dec 29 2001
%E Offset corrected by _Stefano Spezia_, Nov 07 2024