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/
>