[go: up one dir, main page]

login
A362992
a(n) = (n + 1)^(n - 1) * lcm{k + 1 : 0 <= k <= n}. Main diagonal of triangle A362995.
1
1, 2, 18, 192, 7500, 77760, 7058940, 220200960, 12053081880, 252000000000, 65362309994520, 1716349336289280, 645822919595173320, 20430218263561666560, 701330854833984375000, 51933349175015422033920, 35071094208630625451626320, 1487906280482935955379978240
OFFSET
0,2
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
KEYWORD
nonn
AUTHOR
Peter Luschny, May 15 2023
STATUS
approved