base

function z= baseLagrange (i,x,t)


%t = linspace (-2,2,100)
%x = [0 1 3]
n = length (x)-1;
z = 1

for j=1:i-1
    a = ((t-x(j))./(x(i)-x(j)))
    z = z*a;
end
for j=i+1:n
    a = ((t-x(j))./(x(i)-x(j)))
    z = z*a;
end