Matlab
Matlab
Matlab
Mientras que al
sumar el cubo del primero más el cuadrado del segundo se obtiene 40.
Encuentre estos dos números. (bisección en Matlab).
𝑥𝑦 = 5
𝑥 3 + 𝑦 2 = 40
X=0.79590
5 5
𝑦= = = 6.282
𝑥 0.79590
SOLUCION: X= 0.79590; Y=6.282
2. El producto de las edades en años de dos personas es 677.35 y si se
suman los cubos de ambas edades se obtiene 36594.38 Encuentre
cuales son estas edades. (bisección en Matlab).
𝒙𝒚 = 𝟔𝟕𝟕. 𝟑𝟓
𝒙𝟑 + 𝒚𝟑 = 𝟑𝟔𝟓𝟗𝟒. 𝟑𝟖
clear all
format short;
a=input('Introduzca el valor de a: ');
b=input('Introduzca el valor de b: ');
cont=input('Introduzca el número de iteraciones cont: ' );
fun=input('Introduzcal a funcion f(x)=' ,'s');
f=inline(fun);
for k=1:cont
c=(a+b)/2;
e=abs((b-a)/2);
A(k,:)=[k a b c f(c) e];
if f(a)*f(c)<0
b=c;
MATLAB Command Window Page 6
else
a=c;
end
end
fprintf('\n \tk \ta \tb \tc \tf(c) \terror \n' )
disp(A)
fprintf('Solución:\n c=%8.5f\n',c)
fprintf('f(c)=%8.5f\n',f(c))
fprintf('error=%8.5f\n',e)
Introduzca el valor de a: 22
Introduzca el valor de b: 26
Introduzca el número de iteraciones cont: 10
Introduzcal a funcion f(x)=1*X^6-36594.38*X^3+310770227.3
k a b c f(c) error
1.0e+07 *
0.0000 0.0000 0.0000 0.0000 -0.4008 0.0000
0.0000 0.0000 0.0000 0.0000 1.3562 0.0000
0.0000 0.0000 0.0000 0.0000 0.4278 0.0000
0.0000 0.0000 0.0000 0.0000 -0.0000 0.0000
0.0000 0.0000 0.0000 0.0000 0.2107 0.0000
0.0000 0.0000 0.0000 0.0000 0.1045 0.0000
0.0000 0.0000 0.0000 0.0000 0.0520 0.0000
0.0000 0.0000 0.0000 0.0000 0.0260 0.0000
0.0000 0.0000 0.0000 0.0000 0.0130 0.0000
0.0000 0.0000 0.0000 0.0000 0.0065 0.0000
Solución:
c=23.74609
f(c)=64802.43180
error= 0.00391
677.35
𝑦= = 28.5247
23.74609
>> clear
disp('Método de Newton Raphson')
%Damos de alta la variable simbólica X
syms x
%Introducimos la función,el punto de inicio,así como
%porcentaje de error
f=input('Introduzca la función f(x):');
pi=input('Introduzca el punto de inicio:' );
err=input('Porcentaje de error:');
%Graficamos la función
ezplot(f)
grid on
%Calculamos la derivada de la función
d=diff(f);
d=inline(d);
f=inline(f);
ea=100;
j=0;
while ea>err
%Aproximamos la raiz con la fórmula correpondiente
xi=pi-(f(pi)/d(pi));
%Calculamos el porcentaje de error
ea=abs(((xi-pi)/xi)*100);
pi=xi;
j=j+1;
end
%Mostramos los resultados en pantalla (con 3 decimales)
fprintf('\nRaiz= %10.3f en %d Iteraciones' ,pi,j)
Método de Newton Raphson
Introduzca la función f(x):x+(x*log(x))-250
Introduzca el punto de inicio:10
Porcentaje de error:0.001%
Raiz= 50.743 en 4 Iteraciones
Nota: Para empezar a tener ganancias se debe vender más de 50.743 artículos por lo contrario
tenemos perdidas
4. En una empresa de fertilizantes en cada mes, el ingreso por ventas en
miles de dólares se describe con el modelo v(x) = 0.4x (30 - x) mientras
que el costo de producción en miles de dólares es c(x) = 5+ 10 ln(x),
siendo x la cantidad producida en toneladas, 1<x<30. ¿Qué cantidad
mensual debe producir para obtener el máximo beneficio económico?
(Newton en Matlab)
𝑉(𝑥) = 0.4𝑥(30 − 𝑥)
𝐶(𝑥) = 5 + 10ln(𝑥)
0.4𝑥(30 − 𝑥) = 5 + 10ln(𝑥)
clear
disp('Método de Newton Raphson')
%Damos de alta la variable simbólica X
syms x
%Introducimos la función,el punto de inicio,así como
%porcentaje de error
f=input('Introduzca la función f(x):');
pi=input('Introduzca el punto de inicio:' );
err=input('Porcentaje de error:');
%Graficamos la función
ezplot(f)
grid on
%Calculamos la derivada de la función
d=diff(f);
d=inline(d);
f=inline(f);
ea=100;
j=0;
while ea>err
%Aproximamos la raiz con la fórmula correpondiente
xi=pi-(f(pi)/d(pi));
%Calculamos el porcentaje de error
ea=abs(((xi-pi)/xi)*100);
pi=xi;
j=j+1;
end
%Mostramos los resultados en pantalla (con 3 decimales)
fprintf('\nRaiz= %10.3f en %d Iteraciones' ,pi,j)
Método de Newton Raphson
Introduzca la función f(x):(0.4*x^2)+(10*log(x))-(12*x)+5
Introduzca el punto de inicio:20
Porcentaje de error:0.1%
Raiz= 26.430 en 4 Iteraciones>>
b)
f=
@(x)(4.4563*x)+2*exp(0.1*x)-100
>> fzero(f,0)
ans =
>> clear
A=
10.0000 2.7183
20.0000 7.3891
>> B=[25;650]
B=
25
650
>> s = inv(A)*B
s=
-81.0327
307.2995
K1=-81.0327 K2=307.2995
>> betty(25)
ans =
1.7179e+03
f=
@(t)-81.0327*t+307.2995*exp(0.1*t)-5000
>> fzero(f,0)
ans =
32.0802