A092326 Permanent of the inverse of the n-th Hilbert matrix divided by the determinant of the inverse of the n-th Hilbert matrix.

1, 7, 647, 878769, 18203480001, 5850859031888599, 29453515169174062608487, 2335404534493957255219087217249, 2927451248337363113001580852250754885313

Offset: 1

Author

Robert G. Wilson v, Jan 30 2004

Keywords

• nonn

Links

• Eric Weisstein's World of Mathematics, Permanent.

Crossrefs

Cf. A061914.

Programs

Mathematica

Permanent[m_List] := With[{v = Array[x, Length[m]]}, Coefficient[Times @@ (m . v), Times @@ v]]; f[n_] := Block[{i = Inverse[Table[1/(i + j - 1), {i, n}, {j, n}]]}, Permanent[i]/Det[i]]; Table[ f[n], {n, 1, 10}]