A055774 Least common multiple of n! and n^n.

1, 4, 54, 768, 75000, 233280, 592950960, 5284823040, 1735643790720, 5670000000000, 1035338990313196800, 17163493362892800, 145077660657859734604800, 9653278129532887449600

Offset: 1

Author

Henry Bottomley, Jul 12 2000

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A000142 (n!), A000312 (n^n), A051696 (gcd).

Programs

GAP

List([1..200], n->Lcm(Factorial(n),n^n)); # Muniru A Asiru, Feb 04 2018

Maple

A055774:=n->lcm(n!,n^n): seq(A055774(n), n=1..15); # Wesley Ivan Hurt, Jul 07 2014

Mathematica

Table[LCM[n!, n^n], {n, 15}] (* Wesley Ivan Hurt, Jul 07 2014 *)

PARI

a(n) = lcm(n!, n^n); \\ Michel Marcus, Feb 06 2018

Formula

a(n) = lcm(A000312(n), A000142(n)) = A000312(n)*A000142(n)/A051696(n).

Extensions

More terms from James Sellers, Jul 13 2000