"nejake" nejmesi ctverce pamatuju ze skoly pred x lety...vysvetleni ode me nechtej, klika ze jsem to vubec naselkdyby to nahodou pomohlo...
function nejmensictverce(x, y)
%vypocet potrebnych prvku
cosx=cos(x);
sinx=sin(x);
%vytvoreni matice M
M=[sum(cosx.^2) sum(cosx.*sinx) sum(cosx); sum(cosx.*sinx) sum(sinx.^2) sum(sinx); sum(cosx) sum(sinx) length(x)];
%vytvoreni matice vysledku
d=[sum(y.*cosx); sum(y.*sinx); sum(y)];
%vyreseni 3 rovnic o 3 neznamych
c=M\d;
%vypsani funkce
str = [num2str(c(1)) '*cos(x) + ' num2str(c(2)) '*sin(x) + ' num2str(c(3))];
disp(str)
%nakresleni bodu do grafu
plot(x,y,'g+')
title(str);
xlabel('x');
ylabel('y');
hold on;
%vytvoreni intervalu pro osu x (simulace spojiteho casu)
cc= x(1):0.1:x(end);
%vytvoreni funkce s vypocitanymi konstantami
f=c(1)*cos(cc)+c(2)*sin(cc)+c(3);
%vykresleni fce
plot(cc,f);
hold off;