pickn.m.txt

这是马尔可夫-蒙特卡罗算法的MATLAB源程序.

function x = PickN(xset,n)
% x = PickN(xset,n)
% Pick n mebmers of set xset, uniformly at random

% Colin Fox, 19 Jan 2003

m = length(xset);
x = xset(min(floor(rand(1,n)*m)+1,m));