标签：style http ar color sp on bs html ef
Permanent[m_List] :=
With[{v = Array[x, Length[m]]},
Coefficient[Times @@ (m.v), Times @@ v]]
参考资料: http://mathworld.wolfram.com/Permanent.html
标签：style http ar color sp on bs html ef
原文地址：http://www.cnblogs.com/zhangzujin/p/4111583.html
