login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Permanent of the symmetric n X n matrix in A260638.
1

%I #10 Nov 22 2015 15:17:02

%S 1,4,206,433284,131782705528,21826979750768842816,

%T 7637711141088259236341772556400,

%U 22237835372502772582455643527946875785037270496,2138255561398515897400115384129197209090292453675665760256378885504

%N Permanent of the symmetric n X n matrix in A260638.

%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Permanent">Permanent</a>

%t Permanent[m_List] := With[{v = Array[x, Length[m]]}, Coefficient[Times @@ (m.v), Times @@ v]]; Table[m = Table[QBinomial[r + c, r, 2], {r, 0, n}, {c, 0, n}]; Permanent[m], {n, 0, 8}]

%Y Cf. A260638.

%K nonn

%O 1,2

%A _Arkadiusz Wesolowski_, Nov 11 2015