Re: Torus radii & Meshes
- To: mathgroup at smc.vnet.net
- Subject: [mg95511] Re: Torus radii & Meshes
- From: dh <dh at metrohm.com>
- Date: Tue, 20 Jan 2009 05:48:45 -0500 (EST)
- References: <gkpppm$dmb$1@smc.vnet.net>
Hi Franco,
you may add sections by more mesh functions:
ParametricPlot3D[{{(3 + Cos[v]) Sin[u], (3 + Cos[v]) Cos[u],
4 + Sin[v]}}, {u, 0, 2 Pi}, {v, 0, 2 Pi},
MeshFunctions -> {#4 &, #4 + 1 &, #5 &, #5 + 1 &},
Mesh -> {{{3 Pi/4, Directive[Red, Thick]}}},
PlotStyle -> {Green, Opacity[0.5]}]
However, it may be easier to use Mesh->True:
ParametricPlot3D[{{(3 + Cos[v]) Sin[u], (3 + Cos[v]) Cos[u],
4 + Sin[v]}}, {u, 0, 2 Pi}, {v, 0, 2 Pi}, Mesh -> True,
PlotStyle -> {Green, Opacity[0.5]}]
hope this helps, Daniel
Franco Milicchio wrote:
> Hi everybody!
>
> I am trying to make a 3D plot of a torus highlighting its circular
> sections. Now, I am not that trained with Mathematica, and all I've
> succeeded in doing is to get the "vertical" section. I still miss the
> horizontal one:
>
> ParametricPlot3D[
> {
> {(3 + Cos[v]) Sin[u],
> (3 + Cos[v]) Cos[u],
> 4 + Sin[v]}
> },
> {u, 0, 2 Pi},
> {v, 0, 2 Pi},
> MeshFunctions -> {#4 &}, Mesh -> {{{3 Pi/4, Directive[Red, Thick]}}},
> PlotStyle -> {Green, Opacity[0.5]}]
>
>
> Another question. Is mathematica able to manipulate meshes? I mean, I
> know I can import and plot 3D models (STL, Maya, and so on), but what
> if I want to manipulate that data, getting adjacency matrices and
> other information? Is there a tutorial on this issue?
>
> Thanks!
> Franco
>