ClubEnsayos.com - Ensayos de Calidad, Tareas y Monografias
Buscar

Analisis Dimensional


Enviado por   •  31 de Octubre de 2013  •  256 Palabras (2 Páginas)  •  532 Visitas

Página 1 de 2

Comando para mostrar la nube de puntos entre el Tiempo de entrega (Y)

y la Cantidad de cajas (X1)

>>plot (X1,Y);

Comando para mostrar la nube de puntos entre el Tiempo de entrega (Y)

y la Distancia (X2)

>>plot (X2,Y);

Comandos para mostrar las gráficas anteriores en una sola pantalla

>>subplot(1,2,1); plot(X1,Y);

>>subplot(1,2,2); plot(X2,Y);

Nuestra Matriz para Regresión:

>>X=[ones(m,1) X1 X2]; ‘X=[ones(m,1) A(:,2:end)];

Para el ANALISIS DE RESIDUALES tenemos que calcular las siguientes

expresiones:

  ′

  

  

√ Residuales ESTANDARIZADOS



   



  1 



,

!"  !

  

#$

Residuales STUDENTIZADOS

%  

$

Residuales PRESS

&  

#$

Residuales R de Student

Si alguno de los  ES MAYOR a 3 podemos considerar que esa observación

puede generar alguna distorsión para el Modelo.

UNIVERSIDAD NACIONAL DE INGENIERIA

ESCUELA DE INGENIERIA ESTADÍSTICA – FIECS

Ciiiccclllo Acccaaadééémiiiccco 222000111333---III

ES712 – Guia de Laboratorios Pag. 3

Archivo *.m para ANALISIS de INFLUENCIA y Gráfico con Diagrama

de dispersión para el Modelo Lineal General.

Siga la secuencia:

Archivo>>Nuevo>>Archivo *.m

Ingrese el nombre y la ruta para el archivo a crear. (Por ejemplo:

D:\ES712\Residuales.m)

Aparece una ventana de edición de sentencias.

Digite las siguientes sentencias, en líneas diferentes

format short;

A=load('Tiempo.txt');

[m,n]=size(A);

X=[ones(m,1) A(:,2:end)];

Y=A(:,1);

n=length(Y);

k=2;

b=inv(X'*X)*(X'*Y);

SCT=Y'*Y-n*mean(Y)^2;

SCE=Y'*Y-b'*X'*Y;

SCR=SCT-SCE;

R2=SCR/SCT;

Sigma=SCE/(n-k-1);

Varb=Sigma^2*inv(X'*X);

CMR=SCR/k;

CMT=SCT/(n-1);

CME=SCE/(n-k-1);

F=CMR/CME;

H=X*inv(X'*X)*X';

I=eye(m);

e=(I-H)*Y

d=e/(Sigma^0.5);

p=k+1;

for j=1:n

r1(j)=e(j)/(Sigma*(1-H(j,j)))^0.5;

p1(j)=e(j)/(1-H(j,j));

UNIVERSIDAD NACIONAL DE INGENIERIA

ESCUELA DE INGENIERIA ESTADÍSTICA – FIECS

Ciiiccclllo Acccaaadééémiiiccco 222000111333---III

ES712 – Guia de Laboratorios Pag. 4

s1(j)=(((n-p)*Sigma-(e(j)^2/(1-H(j,j))))/(n-p-1))^0.5;

t1(j)=e(j)/(s1(j)*(1-H(j,j))^0.5);

end

r=r1';

p=p1';

s=s1';

t=t1';

...

Descargar como (para miembros actualizados) txt (3 Kb)
Leer 1 página más »
Disponible sólo en Clubensayos.com