| Author |
Comment/Response |
Bill
|
 10/27/07 09:51am
Hi :
I have plot that's given by:
spiral = SphericalPlot3D[\[Phi], {\[Theta], 0, Pi}, {\[Phi], 0, 3 Pi},
BoxRatios -> {1, 1, 1}, PlotRange -> {{-10, 10}, {-10, 10}, {-10, 10}}];
line = ParametricPlot3D[{-3*t, 16*t, 1*t}, {t, -2, 2},
AxesLabel -> {"x", "y", "z"}, PlotStyle -> {Thickness[0.006], Blue}];
Show[spiral, line]
This is a line that pierces a spiral. (The spiral looks like a snail's shell.)
How can I calculate the intersection point coordinates that are shown in the plot?
Thanks,
Bill
PS. I'm using Mathematica 6.0.1.
URL: , |
|
