randb.m

这是用matlab编写的支持向量机的函数工具箱

function ret = randb ( p ) 
# randb ( p ) 
# returns 0/1 with probability 1-p / p 
# using randn crudely
if(nargin != 1 ) 
	usage ("randb(p)");
endif
ret = ( rand(size(p)) < p ) ;