Re: ImplicitPlot3d
- To: mathgroup at smc.vnet.net
- Subject: [mg32039] Re: ImplicitPlot3d
- From: Daniel Meisel <Daniel.Meisel at Physik.UNI-Karlsruhe.de>
- Date: Thu, 20 Dec 2001 03:42:00 -0500 (EST)
- References: <9vmrhd$hfb$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi, thank you all for your answers. Now I found what I was searching for. That's what Hartmut Wolf told me (thanks): " Daniel, as I read your problem, you want to know from where to get the package ImplictPlot3D. It is ever rewarding to start a search at http://www.mathsource.com/ It will return http://www.mathsource.com/Content/Enhancements/Graphics/3D/0203-409 the package and illustrations. If you put the package into "C:\Programme\Wolfram Research\Mathematica\4.1\AddOns\StandardPackages\Graphics" and then load <<Graphics`ImplicitPlot3D` ?ImplicitPlot3D "ImplicitPlot3D[eqn,{x,a,b},{y,c,d},{z,e,f}] draws a graph of the set of points with coordinates (x,y,z) in the box a2x2b, c2y2d, e2z2f that satisfy the equation eqn. ImplicitPlot3D[func,{x,a,b},{y,c,d},{z,e,f}] draws a graph of the set of points with coordinates (x,y,z) in the box a2x2b, c2y2d, e2z2f that satisfy the equation func = 0." you may plot the sphere: ImplicitPlot3D[x^2+y^2+z^2-1,{x,-1,1},{y,-1,1},{z,-1,1}]//Timing {54.038 Second, -Graphics3D-} There are options Options[ImplicitPlot3D] {Compiled -> True, PlotPoints -> {{5,5,5},{3,3,3}}, Passes -> Automatic} I couldn't see any effect from changing passes. However explicitly including the subdivision into PlotPoints, e.g. PlotPoints -> {{4},{3},{3}} works. But beware of the calculation time! PlotPoints -> {{5},{3}} is equivalent to PlotPoints -> {{5,5,5},{3,3,3}}, etc. " Daniel Meisel schrieb: > Hi, > > I'm searching for a way to plot for example the equation > > x^2 + y^2 + z^2 =1 > > ( a sphere around the origin with radius 1) in 3d. > > I cannot use the parametric plot command. > > thanks in advance