%I A092326
%S A092326 1,7,647,878769,18203480001,5850859031888599,29453515169174062608487,
%T A092326 2335404534493957255219087217249,
%U A092326 2927451248337363113001580852250754885313
%N A092326 Permanent of the inverse of the n-th Hilbert matrix divided by the determinant 
               of the inverse of the n-th Hilbert matrix.
%H A092326 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               Permanent.html">Link to a section of The World of Mathematics.</a>
%t A092326 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}]
%Y A092326 Cf. A061914.
%Y A092326 Sequence in context: A052132 A052134 A101811 this_sequence A074282 A013568 
               A038803
%Y A092326 Adjacent sequences: A092323 A092324 A092325 this_sequence A092327 A092328 
               A092329
%K A092326 nonn
%O A092326 1,2
%A A092326 Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 30 2004