%% 9.uzd
clear all, clc, close all
format long
xpunk=[0:0.25:9];
ypunk=@(xpunk)log(1+xpunk.^2);
format shortG
rez = ypunk(1.26) % f(x) vertiba pie punkta
format long
plot(xpunk,ypunk(xpunk),'or','LineWidth',3)
p=polyfit(xpunk,ypunk(xpunk),5)
% Columns 1 through 5
% -0.000382938406229   0.009216536064818  -0.076078082611250   0.198146240383163   0.668225432291608
%                              4pakape
% Column 6
%  -0.083730878486571
%

xaprok=0:0.01:9; yaprok=polyval(p,xaprok);
polvert=polyval(p,1.26) % polinoma vertiba pie punkta
figure
plot(xpunk,ypunk(xpunk),'or',xaprok,yaprok,'k','LineWidth',3)