       Re: How to produce "thick" lines in 3D?

• To: mathgroup at smc.vnet.net
• Subject: [mg29439] Re: How to produce "thick" lines in 3D?
• From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
• Date: Tue, 19 Jun 2001 05:35:54 -0400 (EDT)
• Organization: Universitaet Leipzig
• References: <9gkbiq\$e2c\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Hi,

the easy way is to use MathGL3d from

http://phong.informatik.uni-leipzig.de/~kuska/mathgl3dv3/

and send the lines to the MathGL3d window with a

MVLineTubeSize->any number

in the visual parameter panel of MathGL3d.

You *can* use Thickness[] in 3d plots with

gg = ParametricPlot3D[{Cos[phi], Sin[phi], 1, Thickness[0.05]}, {phi, 0,
2Pi}]

you will get a thick line.

To get the polygon out-line you have to tranform the polygons
with the WireFrame[] function or with

the rule

yourGraphics3dObject /.
Polygon[pnts_]:>
{Thickness[0.05],Line[Append[pnts,First[pnts]]}

Or if the polygons should survive the EdgeForm[]
function will do it.

Regards
Jens

Jose Capco wrote:
>
> Dear NG,
>
> I am using ImplicitPlot3D to plot curved line, and circles in three dimensions
> (this is a crude way, I plot for instance {Cost,Sint,0} to plot a circle lying
> on the xy plane.. is there a package that does this for any polygon also?).
> But how is one able to make these circles "thick"? There is no thickness in
> Mathematica. This is a problem in design too, for instance if one wants to
> design the wireframe of a car or some engineering design then this problem I
> think arises. I am hoping for some suggestions.
>
> Sincerely,
> Jose Capco

```

• Prev by Date: RE: Converting Integer to Binary and using bits
• Next by Date: Re: MathML
• Previous by thread: Re: How to produce "thick" lines in 3D?
• Next by thread: RE: How to produce "thick" lines in 3D?