|
Search: id:A095996
|
|
|
| A095996 |
|
a(n) = largest divisor of n! that is coprime to n. |
|
+0
4
|
|
| 1, 1, 2, 3, 24, 5, 720, 315, 4480, 567, 3628800, 1925, 479001600, 868725, 14350336, 638512875, 20922789888000, 14889875, 6402373705728000, 14849255421, 7567605760000, 17717861581875, 1124000727777607680000, 2505147019375
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
FORMULA
|
a(p) = (p-1)!
|
|
MATHEMATICA
|
f[n_] := Select[Divisors[n! ], GCD[ #, n] == 1 &][[ -1]]; Table[f[n], {n, 30}]
|
|
CROSSREFS
|
a(n) = n!/A051696(n) = (n-1)!/A062763(n).
Cf. A036503. [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Dec 15 2008]
Sequence in context: A030418 A037277 A001783 this_sequence A061098 A119619 A099617
Adjacent sequences: A095993 A095994 A095995 this_sequence A095997 A095998 A095999
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 19 2004, based on a suggestion from Leroy Quet, Jun 18 2004
|
|
|
Search completed in 0.002 seconds
|
