Cátedra: Morelli
Fecha: Primera Oportunidad - Primer Cuatrimestre 2006
Día: 23/05/2006
Sea el siguiente sistema de ecuaciones no lineales:

Se quiere realizar el siguiente cálculo:

Se pide:
y que
y los cálculos se realizane n una grilla con 3 dígitos de precisión. ¿Cuál es la cota del error relativo esperada a F?
Dada la función
. Se pide:
.
Parte 1
Sea ![<tex>F(x_1,x_2,\ldots x_n)=\left[\begin{array}{c} f_1(x_1,x_2,\ldots x_n) \\ \vdots \\ f_n(x_1,x_2,\ldots x_n) \end{array} \right]</tex> <tex>F(x_1,x_2,\ldots x_n)=\left[\begin{array}{c} f_1(x_1,x_2,\ldots x_n) \\ \vdots \\ f_n(x_1,x_2,\ldots x_n) \end{array} \right]</tex>](lib/plugins/latex/images/cb726c4678d1054d52ee7852241f492de18d8044_0.png)
Si
es la raíz de
Puede pensarse un sistema iterativo:
Partiendo de un
arbitrario y hasta que
, donde
es la precisión que se desea obtener.
Parte 2
![<tex>F(x,y)=\left[\begin{array}{c} x^2+y^2-6 \\ x\cdot y-2 \end{array} \right]</tex> <tex>F(x,y)=\left[\begin{array}{c} x^2+y^2-6 \\ x\cdot y-2 \end{array} \right]</tex>](lib/plugins/latex/images/4a1a2262bfd1ff27071332630998325deb4a7acc_0.png)
Para hallar la raíz aploco el sistema iterativo de Newton-Rhapson, para lo que debo calcular
.
Resolviendo este sistema se obtiene
. Por lo tanto:
Parte 3
El sistema a resolver puede expresarse como
, entonces puedo plantear una solución de punto fijo
, es decir:
Entonces:
y
es la función de punto fijo tal que
donde
y
.
Parte 1
Interpolar por los puntos:
Tabla de diferencias divididas:
Entonces:
Parte 2
Primero debemos acotar el error de
Para interpolación lineal en un intervalo de paso
haciendo:
Un paso tan grande es inconsistente, pero esto surge de la acotación grosera de
que fue realizada sin el debido análisis.
Parte 3
Planteo las ecuaciones de continuidad:
Y para las derivadas primeras:
Y derivadas segundas:
Y la condición de spline natural:
Parte 4
Realizar un algoritmo que obtenga los
del polinomio interpolador de Newton en un vector N.
LEER X, Y, n
PARA i=1...n
A(i,1)=Y(i)
FIN PARA i
PARA j=2...n
PARA i=j..n
A(i,j)=(A(i,j-1)-A(i-1,j-1))/(X(i)-X(i-j+1))
FIN PARA i
FIN PARA j
PARA k=1...n
N(k)=A(k,k)
IMPRIMIR 'a_',k,'=',N(k)
FIN PARA k
FIN