Re: Getting started with 3D cardioid
- To: mathgroup at smc.vnet.net
- Subject: [mg112036] Re: Getting started with 3D cardioid
- From: David Thomson <aetherwizard at gmail.com>
- Date: Thu, 26 Aug 2010 06:47:47 -0400 (EDT)
- References: <i50622$gbk$1@smc.vnet.net>
On Aug 24, 5:14 am, Alexei Boulbitch <alexei.boulbi... at iee.lu> wrote:
> Hi, Dave,
> try this:
>
> SphericalPlot3D[
> Cos[\[Theta]/2]^2, {\[Theta], 0, \[Pi]}, {\[CurlyPhi], 0, 2 \[Pi]},
> ViewPoint -> {1, 0, -2}]
>
> Have fun, Alexei
Thanks Alexei,
The equation produces the geometry I am looking for. How would I
adjust the proportions such that the mean radius equals 1 instead of .
68?
Also, I tried to use this function with a different equation:
SphericalPlot3D[\[Theta]^-1 Sin[\[Theta] + 1], {\[Theta], 0,
2 \[Pi]}, {\[CurlyPhi], 0, 2 \[Pi]}, ViewPoint -> {1, 0, -2}]
but it did not produce the geometry I was looking for. I was hoping
to produce a horn shape (a 3D pulse).
Dave