¡Hola! Una forma en la que puedes graficar el plano fase es extrayendo los valores para diferentes tiempos mediante la función Table, luego utilizando la función ListPlot. Enseguida te dejo el código que sirve para el ejemplo del video. Muchas gracias por tu pregunta. CÓDIGO TPP = Table[{x[t] /. sol[[1]], y[t] /. sol[[1]]}, {t, ti, tf, 0.01}]; (*Aquí se tabula y se guarda en TTP*) ListPlot[TPP, AxesLabel -> {"x", "y"}] (*Aquí se grafican los pares ordenados guardados en TTP*)
Hola Juan Recomiendo utilizar la función Table, en particular puedes hacer lo siguiente: Table[x[t]/.sol, {t, ti, tf, 0.1}]; Esta línea tabula los valores de x(t) para t entre ti y tf en intervalos de 0.1. Puedes cambiar el valor de ti, el de tf o incluso el tamaño de paso. Espero que esto te ayude 😃
Y para graficar el espacio fase ? Cómo es la expresión para decirle que grafique? Algo así x[t]./Sol / y[t]./Sol ?
¡Hola! Una forma en la que puedes graficar el plano fase es extrayendo los valores para diferentes tiempos mediante la función Table, luego utilizando la función ListPlot. Enseguida te dejo el código que sirve para el ejemplo del video. Muchas gracias por tu pregunta.
CÓDIGO
TPP = Table[{x[t] /. sol[[1]], y[t] /. sol[[1]]}, {t, ti, tf, 0.01}]; (*Aquí se tabula y se guarda en TTP*)
ListPlot[TPP, AxesLabel -> {"x", "y"}] (*Aquí se grafican los pares ordenados guardados en TTP*)
y si quiero la solución para un t determinado?
Hola Juan
Recomiendo utilizar la función Table, en particular puedes hacer lo siguiente:
Table[x[t]/.sol, {t, ti, tf, 0.1}];
Esta línea tabula los valores de x(t) para t entre ti y tf en intervalos de 0.1. Puedes cambiar el valor de ti, el de tf o incluso el tamaño de paso.
Espero que esto te ayude 😃
@matesenminutos8351 muchas gracias!