Re: Plot3D ? or sth

*To*: mathgroup at smc.vnet.net*Subject*: [mg39298] Re: Plot3D ? or sth*From*: "Steve Luttrell" <luttrell at _removemefirst_westmal.demon.co.uk>*Date*: Mon, 10 Feb 2003 01:07:25 -0500 (EST)*References*: <b258gp$hkt$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

You could use ContourPlot3D. The following code gives something like what you want: a=5; r=5; ContourPlot3D[(2x^2+y^2+z^2-1)^3-a*x^2*z^3-y^2*z^3,{x,-r,r},{y,-r,r},{z,-r, 2r},PlotPoints\[Rule]{10,10}]; -- Steve Luttrell West Malvern, UK "Chris" <suwak at inetia.pl> wrote in message news:b258gp$hkt$1 at smc.vnet.net... > Hi, > 14th II is comming so I thought to draw some hearts, i know the formula > but i don't know how to draw it using mathematica, could anyone help me > with it ? > > Here's formula: (2x^2 + y^2 + z^2 -1)^3 = a*x^2*z^3 -y^2*z^3, where a is > a real-noumber value. > > Chris > > > > > -- > Serwis Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/ >