OFFSET
0,1
LINKS
Daniel Suteu, Table of n, a(n) for n = 0..70
FORMULA
MAPLE
a:= n-> max(numtheory[factorset](n!^2+1)):
seq(a(n), n=0..20); # Alois P. Heinz, Mar 19 2018
PROG
(PARI) a(n) = vecmax(factor(n!^2 + 1)[, 1]); \\ Daniel Suteu, Jun 10 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Mar 19 2018
STATUS
approved