RE: Vertical ContourPlot, please help!!!
- To: mathgroup at smc.vnet.net
- Subject: [mg42846] RE: [mg42800] Vertical ContourPlot, please help!!!
- From: "David Park" <djmp at earthlink.net>
- Date: Wed, 30 Jul 2003 19:30:46 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Alex, You can't obtain a true contour plot, but you can plot slices of your function. Something like this, with line labels and varying Hue: lines = {Text[ NumberForm[N[#], 2], {xx = Random[Real, {-1.5, 1.5}], Sin[xx #]}, Background -> GrayLevel[1]], Hue[(# + 2)/8, 0.7, 0.8], First[Plot[f[x, #], {x, -2, 2}, DisplayFunction -> Identity]]} & /@ Range[-2, 2, 1/2]; Show[Graphics[lines], Frame -> True, FrameLabel -> {"x", "z"}, AspectRatio -> Automatic, PlotLabel -> "y Slices of Sin[x y]", Background -> RGBColor[0.980407`, 0.941206`, 0.902005`], ImageSize -> {500, 270}]; David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ Hi everyone! If anyone can help me with this, I would appreciate it! I have a 3D graph of the form z=f[x,y]. If I use the ContourPlot command, then the curves that are generated are the intersections of the surface f[x,y] with a family of horizontal planes, which are all parallel to the plane x-y. But I want to make a "vertical" contour graph. I want to "cut" my f[x,y] surface with a family of vertical planes, that are parallel to the y-z plane, and then project these curves to the y-z plane. Let me also specify that the equation z=f[x,y] cannot be written in the form: x=f1[y,z] or y=f1[x,z] Any ideas on this??? Thank you very much in advance! Alex Markatis Civil Engineer GREECE