| Author |
Comment/Response |
Sinval Santos
|
 07/11/03 11:51am
I want to convert the surface generated by PDE, in lines, but I don't get
How to do?
Thank you
dc = NDSolve[{D[y[x, t], t, t] == D[y[x, t], x, x], y[x, 0] == Exp[-x^2],
Derivative[0, 1][y][x, 0] == 0, y[-5, t] == y[5, t]},
y, {x, -5, 5}, {t, 0, 5}]
pw = Plot3D[Evaluate[y[x, t] /. First[%]], {x, -5, 5}, {t, 0, 5},
PlotPoints -> 30]
FullForm[pw]
Show[pw /. List[a_, b__] :> Line[{a, b}]]
Don't work
URL: , |
|
