2D a 3D grafy, prokládání funkcí (statistické výpočty)

> plot(sin(x)/x,x=0..5*Pi); # umi i limitu v x=0!

>

> with(plots):with(stats);with(statplots);
data:=[10,15,17,19],[3,4,5,6];

Warning, the name changecoords has been redefined

> fit[leastsquare[[x,y], y=a*x^2+b*x+c]]( [data]);
curve:=plot(rhs(%),x=10..20):

> dataplot:=scatterplot(data):
display(dataplot,curve);

Najít fit rac. lomené fce.