RegressaoLinear

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

function [a1,a0, Sx, Sy, Sxy, Sxx]=RegressaoLinear(x,y)
% RegressaoLinear calcula os coeficientes a1 e a0 da equação linear
% Variáveis de entrada:
% x Vetor com as coordenadas x dos pontos.
% y Vetor com as coordenada y dos pontos.
% Variáveis de saída:
% y = a1*x + a0 que melhor se ajusta aos n pontos do conjunto de dados.
% a1 Coeficiente a1.
% a0 Coeficiente a0.
nx = length(x);
ny = length(y);
if nx ~=ny
 disp('ERRO: O numero de elementos em x deve ser o mesmo de y')
 a1='Erro';
 a0='Erro';
else
 Sx = sum(x);
 Sy = sum(y);
 Sxy = sum(x.*y);
 Sxx = sum(x.^2);
 
 a1= (nx*Sxy - Sx*Sy)/(nx*Sxx - Sx^2);
 a0= (Sxx*Sy - Sxy*Sx)/(nx*Sxx - Sx^2);
end