RE: Thicker line in ParametricPlot3D?
- To: mathgroup at smc.vnet.net
- Subject: [mg45185] RE: [mg45174] Thicker line in ParametricPlot3D?
- From: "David Park" <djmp at earthlink.net>
- Date: Sat, 20 Dec 2003 05:55:49 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Sampo,
For ParametricPlot3D the line or surface directives must be included as the
4th item in the list of coordinate functions. This is explained in Help but
many people miss it because it is not intuitive.
ParametricPlot3D[{t, t^2, t^3, Thickness[0.02]}, {t, 0, 1}]
This is a little awkward because if you have first defined the curve by
curve[t_] := {t, t^2, t^3}
and perhaps used the definition in calculations, then to plot it you have to
use...
ParametricPlot3D[Join[curve[t], {Thickness[0.02]}], {t, 0, 1}]
If you use DrawGraphics, from my web site, then it works much like your
solution below. DrawGraphics always extracts the primitive graphics and you
can put any graphics directives, such as Thickness, before drawing the
object.
Needs["DrawGraphics`DrawingMaster`"]
Draw3DItems[
{Thickness[0.02],
ParametricDraw3D[curve[t], {t, 0, 1}]},
Axes -> True
]
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
From: Sampo Smolander [mailto:sampo.smolander+newsnspam at helsinki.fi]
To: mathgroup at smc.vnet.net
Is there a "normal" way to adjust the line thickness in
ParametricPlot3D?
In mere ParametricPlot, I can give the line thickness in options:
ParametricPlot[{t, t^2}, {t, 0, 1}, PlotStyle -> Thickness[0.02]]
In 3D, this is almost the same:
ParametricPlot3D[{t, t^2, t^3}, {t, 0, 1}]
except that ParametricPlot3D does not allow the option PlotStyle
(gives an error for unknown option).
I can adjust the line thickness by doing it like this:
fig = ParametricPlot3D[{t, t^2, t^3}, {t, 0, 1}];
fig[[1]] = Prepend[fig[[1]], Thickness[0.02]];
Show[fig]
I'm just being curious, is there any easier way?