Qurak

Visualize the solutions to partial differential equations in 3D

Ejemplo 3 pasos, ejecutados en orden en una sola sesión. Cada paso se ejecutó contra el motor y la salida de abajo es lo que produjo.

Paso 1
sol1 = DSolve[{D[y[x, t], t] + 2D[y[x, t], x] == Sin[x], y[0, t] == Cos[t]}, y[x, t], {x, t}]
Salida
DSolve[{Derivative[0, 1][y][x, t] + 2*Derivative[1, 0][y][x, t] == Sin[x], y[0, t] == Cos[t]}, y[x, t], {x, t}]
Paso 2
sol2 = sol1[[1, 1, 2]]
Salida
Sin[x]
Paso 3
Plot3D[sol2, {x, -10, 10}, {t, -5, 5}]
Salida
-Graphics3D-

Funciones usadas

Recetas relacionadas

Todas las recetas · Referencia de funciones · Usar esto desde un cliente MCP