bernstein.m

various matlab programs to slove various problems

function [bnk]=bernstein (n,k,x)
if k == 0, 
   C = 1; 
else, 
   C = prod ([1:n])/( prod([1:k])*prod([1:n-k])); 
end
bnk = C * x^k * (1-x)^(n-k);
return