A380297 Denominators of the determinant of matrix (M(n) - H(n)), where H(n) is the n-th Hilbert matrix and M(n) is an n X n matrix with i,j-th entry i+j-1.
1, 1, 4, 135, 403200, 2778300000, 483930961920000, 7180239749742259200000, 5799315033741817236160512000000, 6429886152366060611794081018183680000000, 466736302504188801174703321606427057848320000000000, 23001739511849592885668155296556060490333421994770432000000000
Offset: 0
Crossrefs
Cf. A061913 (numerators).
Programs
-
Mathematica
a[n_]:=Denominator[Det[Table[(i+j-1) - 1/(i+j-1),{i,n},{j,n}]]]; Join[{1},Array[a,11]] -
PARI
a(n) = denominator(matdet(matrix(n, n, i, j, (i+j-1) - 1/(i+j-1)))); \\ Michel Marcus, Jan 19 2025