Continue to Site

Welcome to EDAboard.com

Welcome to our site! EDAboard.com is an international Electronics Discussion Forum focused on EDA software, circuits, schematics, books, theory, papers, asic, pld, 8051, DSP, Network, RF, Analog Design, PCB, Service Manuals... and a whole lot more! To participate you need to register. Registration is free. Click here to register now.

Need Help Plotting 3D Lemniscate of Bernoulli in Mathematica

Status
Not open for further replies.

Johnnyquest

Newbie level 6
Joined
May 20, 2001
Messages
13
Helped
1
Reputation
2
Reaction score
0
Trophy points
1,281
Activity points
118
Hi I am trying to plot a three dimensional Lemniscate of Bernoulli in
Mathematica. So far I have only been able to make a 3D ribbon but would
like to make a tube. I know my formula needs to be changed, could
someone please point me in the right direction?
Here is what I have so far:


knot1 = ParametricPlot3D[{2*(10 + Cos)(Cos[t])/(1 +
Sin[t]^2), (10 + Sin)(Sin[t]Cos[t])/(1 + Sin[t]^2),
u*Sin[t]},
{t, 0,2p}, {u, 0,3}, PlotPoints -> 175, Mesh -> False, ViewPoint
-> {0, 1, 3}]


Thanks,

JohnnyQuest
 

Status
Not open for further replies.

Similar threads

Part and Inventory Search

Welcome to EDABoard.com

Sponsor

Back
Top