A294041 a(n) = lcm(n^n, factorial(n)/factorial(floor(n/2))^2).

1, 1, 4, 54, 768, 18750, 233280, 16470860, 587202560, 27119434230, 630000000000, 71898540993972, 686539734515712, 279856598491241772, 4767050928164388864, 500950610595703125000, 118704798114320964648960, 10646582170477154154957990, 478255590155229414229278720

Offset

0,3

Links

Table of n, a(n) for n=0..18.

Formula

a(n) = lcm(A000312(n), A056040(n)).

Maple

seq(ilcm(n^n, n!/iquo(n, 2)!^2), n=0..18);

Mathematica

Join[{1}, Table[LCM[n^n, n!/(Floor[n/2]!)^2], {n, 20}]] (* Harvey P. Dale, Sep 21 2023 *)

Crossrefs

Cf. A000312, A056040.

Sequence in context: A357558 A241126 A089205 * A055774 A071248 A221611

Adjacent sequences: A294038 A294039 A294040 * A294042 A294043 A294044

Keyword

nonn

Author

Peter Luschny, Nov 29 2017

Status

approved