3D volume function
- To: mathgroup at smc.vnet.net
- Subject: [mg2100] 3D volume function
- From: Stefan Schulz <sschulz at chemie.fu-berlin.de>
- Date: Fri, 29 Sep 1995 01:15:56 -0400
Dear MATHEMATICA whizards, I have used ImplicitPlot3D in the following context << ImplicitPlot3D.m alpha = 0.2 ImplicitPlot3D[(128*alpha^5/Pi^2)^(1/4)* z^2 Exp[-2*alpha*(x^2+y^2+z^2)] == 0.01, {x,-3.0, 3.0}, {y,-3.0,3.0}, {z,-4.0,4.0}, PlotPoints->{{4,4,4},{4,4,4},{2,2,2}}, AxesLabel->{x, y, z}, Axes -> True, Mesh -> True, PlotRange->{{-4,4},{-4,4},{-5,5}}] which gives me a rather nice surface in three-dimensional space. Is there a similar package available for calculating the volume enclosed by such implicitly defined surfaces (maybe even called ImplicitVolume3D.m) ? Thanks for any help or helpful hints on this subject in advance. Regards Stefan Schulz =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= | | Stefan Schulz | | sschulz at chemie.fu-berlin.de | FU Berlin - Theoretical Chemistry | | Tel. ++49/30/838 5384 (2351) | Takustrasse 3 | | FAX. ++49/30/838 4792 | D-14195 Berlin | =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= --=_AABcYQAAIrUwag2j--