permut.m

来自「matlab的常用函数工具包」· M 代码 · 共 5 行

function y=permut(n)
maple('with(combinat):');
y1=eval(maple(['permute(',int2str(n),')']));
n1=eval(maple(['numbperm(',int2str(n),')']));
y=reshape(y1,[n,n1])';