Anul 3 Semestrul 2
This commit is contained in:
@@ -0,0 +1,12 @@
|
||||
function Lnf = aitken(x0,f0,x)
|
||||
p = zeros(length(x0));
|
||||
p(:,1) = f0'
|
||||
|
||||
n = length(x0)
|
||||
for i=2:n
|
||||
for j=2:i
|
||||
p(i,j) = (1/(x0(i)-x0(i-j+1)))*det([x-x0(i-j+1), p(i-1,j-1);x-x0(i),p(i,j-1)]);
|
||||
endfor
|
||||
endfor
|
||||
Lnf=p(n,n);
|
||||
end;
|
||||
Reference in New Issue
Block a user