DBETA The beta density function f = dbeta(x,a,b)
0001 function d = dbeta(x,a,b) 0002 %DBETA The beta density function 0003 % 0004 % f = dbeta(x,a,b) 0005 0006 % Anders Holtsberg, 18-11-93 0007 % Copyright (c) Anders Holtsberg 0008 0009 if any(any((a<=0)|(b<=0))) 0010 error('Parameter a or b is nonpositive') 0011 end 0012 0013 I = find((x<0)|(x>1)); 0014 0015 d = x.^(a-1) .* (1-x).^(b-1) ./ beta(a,b); 0016 d(I) = 0*I;