12.07.2015 Views

1) Tomamos el sistema que aparece en la resolución del ejercicio 2 ...

1) Tomamos el sistema que aparece en la resolución del ejercicio 2 ...

1) Tomamos el sistema que aparece en la resolución del ejercicio 2 ...

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

SISTEMAS DE ECUACIONES LINEALESEjercicios1) <strong>Tomamos</strong> <strong>el</strong> <strong>sistema</strong> <strong>que</strong> <strong>aparece</strong> <strong>en</strong> <strong>la</strong> resolución d<strong>el</strong> <strong>ejercicio</strong> 2 apartado c) de <strong>la</strong> hoja de problemas desplines 4 1 0 0 0 0 r1 96 r1 35.6125 1 4 1 0 0 0 r 2174 r2 46.4500 0 1 4 1 0 0 r 330 r3 23.8124 0 0 1 4 1 0 r4 396 r4 111.6998 0 0 0 1 4 1 r 512 r5 26.9866 0 0 0 0 1 4 r 690 r6 15.7533Se pide.a) Introducir <strong>la</strong> matriz A de los coefici<strong>en</strong>te como una matriz B sparseb) Dar A como una matriz ll<strong>en</strong>a a partir de <strong>la</strong> matriz Bc) Volver a definir A como una matriz dispersa S a partir de <strong>la</strong> matriz ll<strong>en</strong>ad) Introducir A como una matriz tridiagonal E cuyas diagonales son esca<strong>la</strong>rese) Dar <strong>la</strong> solución A\b d<strong>el</strong> <strong>sistema</strong>f) Dar <strong>la</strong> descomposición LU de Ag) Hal<strong>la</strong>r <strong>la</strong> solución d<strong>el</strong> <strong>sistema</strong> utilizando <strong>la</strong> descomposición LUh) Dar <strong>la</strong> solución con <strong>la</strong> función crouti) Dar una solución aproximada aplicando <strong>el</strong> método de Jacobi, tomando como x 0 <strong>el</strong> vector nulo, comocota de error tol=0.01 y como <strong>el</strong> máximo de iteraciones maxiter=50.j) Dar una solución aproximada aplicando <strong>el</strong> método de Gauss‐Seid<strong>el</strong>k) Dar una solución aproximada aplicando <strong>el</strong> método de sobrerr<strong>el</strong>ajación con =1.2l) Dar <strong>el</strong> número de condición de ASolución:a) B=sparse([1,1,2,2,2,3,3,3,4,4,4,5,5,5,6,6],[1,2,1,2,3,2,3,4,3,4,5,4,,5,6,5,6],[4,1,1,4,1,1,4,1,1,4,1,1,4,1,1,4]B =(1,1) 4(2,1) 1(1,2) 1(2,2) 4(3,2) 1(2,3) 1(3,3) 4(4,3) 1(3,4) 1(4,4) 4(5,4) 1(4,5) 1Unidad Doc<strong>en</strong>te de Matemáticas de <strong>la</strong> ETSITGCAsignatura: INFERENCIA ESTADÍSTICA y CÁLCULO NUMÉRICO APLICADOS A LA INGENIERÍA 1


SISTEMAS DE ECUACIONES LINEALESEjercicios0 0 0 1 4 10 0 0 0 1 4e) >> b=[‐96;174;30;‐396;12;90], x=A\bb =‐9617430‐3961290x =‐35.612546.450023.8124‐111.699826.986615.7533f) Obsérvese <strong>que</strong> A es una matriz estrictam<strong>en</strong>te diagonal dominante por lo <strong>que</strong> no haría falta <strong>el</strong> pivoteo>> [L,U]=lu(A)L =1.0000 0 0 0 0 00.2500 1.0000 0 0 0 00 0.2667 1.0000 0 0 00 0 0.2679 1.0000 0 00 0 0 0.2679 1.0000 00 0 0 0 0.2679 1.0000U =4.0000 1.0000 0 0 0 00 3.7500 1.0000 0 0 00 0 3.7333 1.0000 0 00 0 0 3.7321 1.0000 00 0 0 0 3.7321 1.00000 0 0 0 0 3.7321g) La solución con <strong>la</strong> descomposición LU es>> x=U\(L\b)Unidad Doc<strong>en</strong>te de Matemáticas de <strong>la</strong> ETSITGCAsignatura: INFERENCIA ESTADÍSTICA y CÁLCULO NUMÉRICO APLICADOS A LA INGENIERÍA 3


SISTEMAS DE ECUACIONES LINEALESEjerciciosx =‐35.612546.450023.8124‐111.699826.986615.7533h) Para hal<strong>la</strong>r <strong>la</strong> solución d<strong>el</strong> <strong>sistema</strong> con <strong>el</strong> algoritmo de crout de MATLAB hemos de definir <strong>la</strong> funcióncrout (a,b,c,z) <strong>en</strong> MATLAB con un fichero d<strong>el</strong> tipo.mFile/NewB<strong>la</strong>nk M‐File (<strong>la</strong>s órd<strong>en</strong>es se pued<strong>en</strong> copiar d<strong>el</strong> docum<strong>en</strong>to Ficheros_MATLAB (punto m) <strong>que</strong>se <strong>en</strong>cu<strong>en</strong>tra <strong>en</strong> <strong>el</strong> curso “Complem<strong>en</strong>tos Formativos”d<strong>el</strong> Moodle d<strong>el</strong> C<strong>en</strong>tro>> a=[4,4,4,4,4,4],b=[1,1,1,1,1],c=[1,1,1,1,1],z=[‐96;174;30;‐396;12;90], crout(a,b,c,z)a =4 4 4 4 4 4b =1 1 1 1 1c =1 1 1 1 1z =‐9617430‐3961290x =x =x =0 0 0 0 26.9866 15.75330 0 0 ‐111.6998 26.9866 15.75330 0 23.8124 ‐111.6998 26.9866 15.7533x =Unidad Doc<strong>en</strong>te de Matemáticas de <strong>la</strong> ETSITGCAsignatura: INFERENCIA ESTADÍSTICA y CÁLCULO NUMÉRICO APLICADOS A LA INGENIERÍA 4


SISTEMAS DE ECUACIONES LINEALESEjerciciosmaxiter =50incr =1.0100ans =‐35.613046.452023.8113‐111.697226.985715.7545j) Para hal<strong>la</strong>r <strong>la</strong> solución d<strong>el</strong> <strong>sistema</strong> con <strong>el</strong> método (iterativo) de Gauss‐Sied<strong>el</strong> hemos de definir unafunción <strong>que</strong> podemos designar por gaussied<strong>el</strong> (A,b,x0,tol,maxiter) <strong>en</strong> MATLAB con un fichero d<strong>el</strong> tipo.m(tal y como se ha mostrado <strong>en</strong> <strong>el</strong> apartado anterior)A es <strong>la</strong> matriz de coefici<strong>en</strong>tes d<strong>el</strong> <strong>sistema</strong>, b es <strong>la</strong> columna de términos indep<strong>en</strong>di<strong>en</strong>tes, x0 es <strong>el</strong> valorinicial, tol es <strong>la</strong> cota de error y maxiter es <strong>el</strong> máximo número de iteraciones>> A,b=[‐96;174;30;‐396;12;90],x0=[0;0;0;0;0;0],tol=0.01,maxiter=50,gaussied<strong>el</strong>(A,b,x0,tol,maxiter)A =4 1 0 0 0 01 4 1 0 0 00 1 4 1 0 00 0 1 4 1 00 0 0 1 4 10 0 0 0 1 4b =‐9617430‐3961290x0 =0000Unidad Doc<strong>en</strong>te de Matemáticas de <strong>la</strong> ETSITGCAsignatura: INFERENCIA ESTADÍSTICA y CÁLCULO NUMÉRICO APLICADOS A LA INGENIERÍA 6


SISTEMAS DE ECUACIONES LINEALESEjercicios00tol =0.0100maxiter =50incr =1.0100ans =‐35.613046.450423.8122‐111.699726.986615.7534k) Para hal<strong>la</strong>r <strong>la</strong> solución d<strong>el</strong> <strong>sistema</strong> con <strong>el</strong> método (iterativo) de Gauss‐Sied<strong>el</strong> hemos de definir unafunción <strong>que</strong> podemos designar por sobrerr<strong>el</strong>ajacion (A,b,x0,omega,tol,maxiter) <strong>en</strong> MATLAB con unfichero d<strong>el</strong> tipo.m (tal y como se ha mostrado <strong>en</strong> <strong>el</strong> apartado anterior)A es <strong>la</strong> matriz de coefici<strong>en</strong>tes d<strong>el</strong> <strong>sistema</strong>, b es <strong>la</strong> columna de términos indep<strong>en</strong>di<strong>en</strong>tes, x0 es <strong>el</strong> valorinicial, tol es <strong>la</strong> cota de error y maxiter es <strong>el</strong> máximo número de iteraciones>> A,b=[‐96;174;30;‐396;12;90], x0=[0;0;0;0;0;0], omega=1.2, tol=0.01, maxiter=50,sobrerr<strong>el</strong>ajacion(A,b,x0,omega, tol,maxiter)A =4 1 0 0 0 01 4 1 0 0 00 1 4 1 0 00 0 1 4 1 00 0 0 1 4 10 0 0 0 1 4b =‐9617430‐3961290Unidad Doc<strong>en</strong>te de Matemáticas de <strong>la</strong> ETSITGCAsignatura: INFERENCIA ESTADÍSTICA y CÁLCULO NUMÉRICO APLICADOS A LA INGENIERÍA 7


SISTEMAS DE ECUACIONES LINEALESEjerciciosx0 =000000omega =1.2000tol =0.0100maxiter =50incr =1.0100ans =‐35.612446.449723.8126‐111.699826.986615.7533l) El número de condición de a es:>> cond(A)ans =2.6396Es decir, <strong>la</strong> matriz está bi<strong>en</strong> condicionada.Unidad Doc<strong>en</strong>te de Matemáticas de <strong>la</strong> ETSITGCAsignatura: INFERENCIA ESTADÍSTICA y CÁLCULO NUMÉRICO APLICADOS A LA INGENIERÍA 8

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!