t=linspace(0,1);
n= 3;
for i=0:n;
b=berstein(n,i,t);
plot(t,b);
hold on
end
xlabel('t')
ylabel('Polinomio de berstein')
title('Polinomio de berstein de grado 3')
legend('B3,0','B3,1','B3,2','B3,3')