Minimos quadrados

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

function r=mnqd(X,Y)
 x=sym('x');
 formatlong
 n=length(X);
 for k=1:n
 R(k)=((X(k)^(2)),X(k),1);
 end
 U=Y/R;
 fprintf('\n ‘equação’%f\n', U)
 for k=1:n
 A(k)=(X(k)^2);
 B(k)=((subs(U(f),x,A(k)))^2);
 C(k)=(A(k)^2);
 S=S+B(k);
 H=H+C(k);
 end
 T=S/H;
 r=double(T);
 fprintf('\n ‘equação ’%f T’x2 é a melhor curva que se adéqua %f’',r)
end