function prolozeni_bodu_5
% proložení bodù se souøadnicemi x,y polynomy a pomocí spline funkcí
x=[1:9];		% zadání x-ových souøadnic bodù (vektoru) x
y=[1:5,4:-1:1];	% zadání y-ovýchsouøadnic bodù (vektoru) y
plot(x,y,'o')	% vykreslení dvourozmìrného grafu, body zobrazeny jako kolecka
xx=linspace(1,9,100);	% body, ve kterých bude poèítána aproximace
                        % jemnìjší dìlení osy x pro zobrazení køivky
y1=polyval(polyfit(x,y,1),xx); 	% body získané polynomiální interpolací
                                % (polynom 1. stupnì - pøímka)
y2=polyval(polyfit(x,y,2),xx); 	% body získané polynomiální interpolací
                                % (polynom 2. stupnì - parabola)
y5=polyval(polyfit(x,y,5),xx); 	% body získané polynomiální interpolací
                                % (polynom 5. stupnì)
y9=polyval(polyfit(x,y,9),xx); 	% body získané polynomiální interpolací
                                % (polynom 9. stupnì)
yii=interp1(x,y,xx,'spline');	% body získané splinovou interpolací
plot(x,y,'o',xx,y1,'r',xx,y2,'c',xx,y5,'y',xx,y9,'m',xx,yii,'--k') 
	% vykreslení dvourozmìrného grafu
	% body - zobrazeny jako kolecka 
	% proložení polynomem 1.stupnì - zobrazeno èervenì (red)
	% proložení polynomem 2.stupnì - zobrazeno tyrkysovou (cyan)
	% proložení polynomem 5.stupnì - zobrazeno žlutì (yellow)
	% proložení polynomem 9.stupnì - zobrazeno fialovì (magenta)
	% proložení pomocí spline funkcí - zobrazeno èárkovanì èernì (black)
legend('body','polynom 1.st (primka)','polynom 2.st (parabola)','polynom 5.st', 'polynom 9.st (nevhodné)','spline','Location','South') 
	% legenda ke grafu s urcenim pozice zobrazeni
    % 'Location','South' - legenda dole
xlabel('x')		% popis osy x 
ylabel('y')		% popis osy y   