second derivative done :DDDDD

This commit is contained in:
LinlyBoi
2023-05-14 22:00:16 +03:00
parent 83548c62c8
commit cb5c3be111

View File

@@ -52,3 +52,23 @@ end
function y = b_newt_diff2(Y,h) function y = b_newt_diff2(Y,h)
y = ( Y(1) - 2 * Y(2) + Y(3) ) / h^2 y = ( Y(1) - 2 * Y(2) + Y(3) ) / h^2
end end
function y = newt_diff_fr(Y,X,x,h)
idx = find(X==x);
if (idx == length(X))
elems = [X(idx), X(idx-1), X(idx-2)]
y = b_newt_diff1(elems,h)
elseif (idx == 1)
elems = [X(idx), X(idx+1), X(idx+2)]
y = f_newt_diff1(elems,h)
else
elems = [X(idx-1), X(idx), X(idx+1)]
y = c_newt_diff1(elems,h)
endif
endfunction