OFFSET
2,1
LINKS
Robert Israel, Table of n, a(n) for n = 2..10000
MAPLE
gpf:= n -> max(numtheory:-factorset(n));
seq(gpf(n*(9*n-7)/2), n=2..100); # Robert Israel, Jun 24 2015
PROG
(PARI) a(n) = my(f = factor(n*(9*n-7)/2)); f[#f~, 1]; \\ Michel Marcus, May 31 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Gionata Neri, May 31 2015
STATUS
approved