A362992 a(n) = (n + 1)^(n - 1) * lcm{k + 1 : 0 <= k <= n}. Main diagonal of triangle A362995.

1, 2, 18, 192, 7500, 77760, 7058940, 220200960, 12053081880, 252000000000, 65362309994520, 1716349336289280, 645822919595173320, 20430218263561666560, 701330854833984375000, 51933349175015422033920, 35071094208630625451626320, 1487906280482935955379978240

Offset

0,2

Links

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

Formula

a(n) = A362995(n, n).

Mathematica

A362992[n_]:=LCM@@Range[n+1](n+1)^(n-1); Array[A362992, 20, 0] (* Paolo Xausa, Aug 09 2023 *)

Prog

(SageMath)
def A362992(n: int) -> int:
    return (n + 1)^(n - 1) * lcm(k + 1 for k in (0..n))
print([A362992(n) for n in (0..17)])
(PARI) a(n) = (n + 1)^(n - 1) * lcm(vector(n, k, k+1)); \\ Michel Marcus, May 20 2023

Crossrefs

Cf. A362995, A000272, A003418.

Sequence in context: A138413 A066274 A052623 * A155542 A157765 A156341

Adjacent sequences: A362989 A362990 A362991 * A362993 A362994 A362995

Keyword

nonn

Author

Peter Luschny, May 15 2023

Status

approved