Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'Problem with combining plots (3D)' topicStudent Support Forum > General > Archives > "Problem with combining plots (3D)"

< Previous CommentHelp | Reply To Comment | Reply To Topic
Author Comment/Response
Michael
07/07/12 1:36pm

Try adding the option PlotRange->All to Show[..]. You also probably want to Chop off the residual imaginary parts from the TU integral. (Evaluate TU[0.7, 0.7] to see.)

Try replacing the show with this:

pTL = Plot3D[TL[x, psi], {x, 0, 0.5}, {psi, 0.01, 1},
AxesLabel -> {"x", "t", "y"},
PlotLabel -> {"Plot of Amodei's Solution to Heat Equation in \
Euclidean"}, Boxed -> False, Mesh -> False];
pTU = Plot3D[Chop[TU[x, psi]], {x, 0.5, 1}, {psi, 0.01, 1},
Boxed -> False, Mesh -> False];
Show[pTL, pTU, PlotRange -> All]





URL: ,

Subject (listing for 'Problem with combining plots (3D)')
Author Date Posted
Problem with combining plots (3D) exw 06/25/12 5:13pm
Re: Problem with combining plots (3D) Michael 07/07/12 1:36pm
< Previous CommentHelp | Reply To Comment | Reply To Topic