MathGroup Archive 2002

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: 3D plot - resend

  • To: mathgroup at smc.vnet.net
  • Subject: [mg36398] Re: 3D plot - resend
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Wed, 4 Sep 2002 21:22:10 -0400 (EDT)
  • Organization: Universitaet Leipzig
  • References: <al4b65$rgt$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

you mean:

In[]:=Needs["Calculus`Integration`"]

Integrate[Boole[x^2 + 4 - z > 0 && 
     4 - x^2 - y > 0 && 3 - x - y < 0 && z > 0], 
   {x, -1, 2}, {y, 1, 5}, {z, -1, 10}]]

Out[]=(15*Sqrt[5])/4

and to plot the volume:
In[]:=Get["MathGL3d`OpenGLViewer`"]

In[]:=MVContourPlot3D[
  If[1 == Boole[x^2 + 4 - z > 0 && 4 - x^2 - y > 0 && 
      3 - x - y < 0 && z > 0], 1., -1.], {x, -1, 2}, 
  {y, 1, 5}, {z, -0.1, 7}, Contours -> {0.}, 
  PlotPoints -> 64, MVNewScene -> True]

Regards
  Jens


Shz Shz Oon wrote:
> 
> First of all, I would like to thanks to all for trying to help.
> Sorry, I must have something missing in my previous description.
> 
> I need to find out the volumn of a 3D object which form by the equation :
> z=x^2 +4 (as bottom surface)
> and on the xy plane which bounded by a parabola y=4-x^2 and y=3x line.
> 
> How would I use Mathematica to plot out this 3D object or find out its volumn
> with only the equation given?
> 
> Thank you once again!
> Shz Shz
> 
> ==================================================================================
> E-mail and Data Confidentiality Notice
> 
> This email and any of its' content is transmitted for the sole use and access
> of the individual or entity to which they are addressed. Any disclosure, copying,
> distribution and diversion contrary to the applicable export control laws and
> regulations including US Export Administration Regulations is strictly prohibited.
> 
> If you have received this email in error, please do not read, copy or use it,
> and do not disclose it to others. Please notify the "postmaster at hitachi.com.my"
> of the delivery error by replying to this message and then delete it from your
> system. Thank you.
> ==================================================================================


  • Prev by Date: Re: Re: approximation for partitial binomial sum
  • Next by Date: Re: approximation for partitial binomial sum
  • Previous by thread: 3D plot - resend
  • Next by thread: RE: Assignments