OFFSET
1,3
COMMENTS
sum(k=1,n,a(k)) seems to be asymptotic to C*n^2 with 1/20 < C < 1/10.
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..10000
PROG
(PARI) a(n) = my(m=1, s=sigma(n!)); for (k=1, n, if ((s % k!) == 0, m = max(m, k))); m; \\ Michel Marcus, Dec 05 2019
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Aug 17 2002
STATUS
approved