y'=f(x,y)=-5*x.^4.*y.^2.
Sobre el campo de direcciones se realiza la gráfica de la solución particular:
y = 1./(x.^5+1).
%=====INICIO========
%-1)---Región--------
x1=0;
x2=2;
y1=0;
y2=2;
N = 20;
x = linspace(x1,x2,N);
y = linspace(y1,y2,N);
[X,Y]= meshgrid(x,y);
%-2)---calculo del angulo de inclinación de cada vector
m = -5*X.^4.*Y.^2;
T = atan(m);
%-3)--componentes de cada vector
U = cos(T);
V = sin(T);
%-4)--Dibujo de los vectores tangentes
h = quiver(X,Y,U,V);
%-5)--superposición en el campo de direcciones de la solución particular
hold on
yp = 1./(x.^5+1);
plot(x,yp)
grid on
%===FIN========
El resultado es el siguiente:

Fig.1. Campo de direcciones (azul). Solución particular (rojo)
Perfecto me sirve mucho. gracias!
ResponderEliminarMuy útil, y ademas bien explicado. Gracias
ResponderEliminarMuchas gracias
ResponderEliminar