A369135 a(n) is the lcm of the denominators of the terms in the n-th row of M where M is the inverse of the matrix generated by the triangle A368846.

1, 6, 30, 420, 630, 13860, 180180, 5405400, 4594590, 96996900, 1222160940, 40156716600, 6692786100, 281097016200, 1164544781400, 72201776446800, 2084826294901350, 1895296631728500, 222622144044300, 1823275359722817000, 575032998066426900, 129519337183533297000

Offset: 0

Author

Peter Luschny, Jan 14 2024

Keywords

• sign

Comments

See A369134 for comments and formulas.

Crossrefs

Cf. A369134, A368846.

Programs

Mathematica

A368846[n_, k_] := If[k == 0, Boole[n == 0], (-1)^(n + k) 2 Binomial[2 k - 1, n] Binomial[2 n + 1, 2 k]];
LCM @@@ Denominator[MapIndexed[Take[#, First[#2]]&, Inverse[PadRight[Table[ A368846[n, k], {n, 0, 25}, {k, 0, n}]]]]] (* Paolo Xausa, Jan 14 2024 *)

SageMath

M = matrix(ZZ, 32, 32, A368846).inverse()
def A369135(n): return lcm(M[n][k].denominator() for k in range(n + 1))
print([A369135(n) for n in range(21)])