[Date Index]
[Thread Index]
[Author Index]
Re: Re: FW: 3D plot question
 To: mathgroup at smc.vnet.net
 Subject: [mg62673] Re: Re: FW: 3D plot question
 From: "JensPeer Kuska" <kuska at informatik.unileipzig.de>
 Date: Wed, 30 Nov 2005 22:08:32 0500 (EST)
 Organization: Uni Leipzig
 References: <dmjrjp$5vr$1@smc.vnet.net>
 Sender: ownerwrimathgroup at wolfram.com
Hi,
any multiple of zero is also zero or do you mean
gg = Plot3D[Sin[x*y], {x, 0, Pi}, {y, 0, Pi}] //
Graphics3D;
Show[gg /. Polygon[pnts_] :> Block[{low, high},
low = {0, 0, 0.2} + # & /@ pnts;
high = {0, 0, 0.2} + # & /@ pnts;
{Polygon[Reverse[low]], Polygon[high],
Polygon /@ Transpose[{low, RotateLeft[low],
RotateLeft[high], high}]}
]
]
Regards
Jens
"Tun Myint Aung" <tma at nus.edu.sg> schrieb im
Newsbeitrag news:dmjrjp$5vr$1 at smc.vnet.net...
 Hi,

 Sorry, my question is not clear. I want to plot
the surface with user defined thickness. I mean I
want to see thicker surface than default
thickness.

 With Regards,

 Tun Myint Aung

 Original Message
 From: Peter Pein [mailto:petsie at dordos.net]
To: mathgroup at smc.vnet.net
 Sent: Tue 11/29/2005 7:43 PM
 Cc:
 Subject: [mg62673] Re: FW: 3D plot question



 Tun Myint Aung schrieb:
 > Dear MathGroup,
 >
 > I have found the solution. Use
PlotRange>All. Another question is
 > that how I can plot to see the thickness of
the surface?
 >
 > With Regards,
 >
 > Tun Myint Aung
 >
 > _____
 >
 > From: Tun Myint Aung
To: mathgroup at smc.vnet.net
 > Subject: [mg62673] 3D plot question
 >
 >
 > Dear Mathgroup,
 >
 > When I plot a 3D plot in mathematica, I
found that some part of the
 > surface has been cut off in the graph. For
example,
 >
 > z = x^5*y
 >
 > Plot3D[z, {x, 1, 1}, {y, 1, 1},
PlotPoints > 40,
 >
 > Mesh > False, BoxRatios > {1, 1, 0.4}]
 >
 > Mathematica plot for z values only in the
range 0.2 to 0.2. Actually
 > when x=1, y=1, z value will be 1. But in the
graph, the surface goes
 > flat for z>0.2.Why? How can I get the graph
for full range of z?
 >
 >
 >
 > Best Regards,
 >
 > Tun Myint Aung
 > Graduate Student
 > National University of Singapore
 > E1A #0218
 > Kent Ridge, 119260, Singapore
 > Email g0202015 at nus.edu.sg
<mailto:g0202015 at nus.edu.sg>
 >
 >

 The thickness of the surface is 0. Or do you
want to look from the side?

 Plot3D[x^5 y, {x, 1, 1}, {y, 1, 1},
PlotRange > All,
 ViewPoint > {0, 3, 0}, PlotPoints > 40,
Mesh > False,
 AxesLabel > {x, y, TraditionalForm[x^5 y]},
ImageSize > 400,
 BoxRatios > {1, 1, 1}];

 Peter

 P.S.: I did not read your 2nd message before
answering the first one.



Prev by Date:
Re: Importing tabdelimited data files?
Next by Date:
Re: Re: Re: Package development
Previous by thread:
Re: Importing tabdelimited data files?
Next by thread:
Re: Re: Re: Package development
 