numgroup.m

来自「遗传算法的通用程序」· M 代码 · 共 9 行

function m=numgroup(n,g)
 b=zeros(length(g),1);
 for k=1:length(g)
  for i=0:g(k)
     b(k)=b(k)+(-1)^i*factorial(g(k))/factorial(g(k)-i)/factorial(i)*(g(k)-i)^n;
  end
  b(k)=b(k)/factorial(g(k));
 end
 m=b;