A062776 Greatest common divisor of (n+2)! and n^n.

1, 4, 3, 16, 5, 576, 7, 256, 81, 25600, 11, 497664, 13, 802816, 91125, 65536, 17, 1719926784, 19, 327680000, 6751269, 507510784, 23, 495338913792, 15625, 5670699008, 1594323, 161128382464, 29, 401224520171520000000, 31

Offset

1,2

Links

David A. Corneth, Table of n, a(n) for n = 1..1259

Mathematica

Table[GCD[(n+2)!, n^n], {n, 40}] (* Harvey P. Dale, Mar 25 2018 *)

Prog

(PARI) j=[]; for(n=1, 75, j=concat(j, gcd((n+2)!, n^n))); j
(PARI) val(n, p) = my(r=0); while(n, r+=n\=p); r
a(n) = my(f = factor(n)[, 1]~); prod(i=1, #f, f[i] ^ min(n, val(n + 2, f[i]))) \\ David A. Corneth, Mar 25 2018

Crossrefs

Sequence in context: A272580 A065679 A223925 * A269512 A270128 A084471

Adjacent sequences: A062773 A062774 A062775 * A062777 A062778 A062779

Keyword

nonn,easy

Author

Jason Earls, Jul 18 2001

Status

approved