OFFSET
1,2
COMMENTS
P(n)! is a multiple of n, for almost all n. The exceptions are A057109.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..456
Paul Erdős and Ilias Kastanas, Solution 6674: The smallest factorial that is a multiple of n, Amer. Math. Monthly 101 (1994) 179.
A. Ivic, On a problem of Erdos involving the largest prime factor of n, arXiv:math/0311056 [math.NT], 2003-2004.
Eric Weisstein's World of Mathematics, Greatest Prime Factor
EXAMPLE
P(12)! = 3! = 6.
MATHEMATICA
Table[FactorInteger[n][[-1, 1]]!, {n, 30}] (* Harvey P. Dale, Jan 29 2014 *)
PROG
(PARI) a(n) = if (n==1, 1, vecmax(factor(n)[, 1])!); \\ Michel Marcus, Sep 24 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Jonathan Sondow, Dec 28 2004
STATUS
approved