       GreyLevel in ParametricPlot3D

• To: mathgroup at smc.vnet.net
• Subject: [mg6312] GreyLevel in ParametricPlot3D
• From: ca10 at ukc.ac.uk (C.Antonopoulos)
• Date: Sat, 8 Mar 1997 00:26:37 -0500 (EST)
• Organization: University of Kent at Canterbury, UK.
• Sender: owner-wri-mathgroup at wolfram.com

```hi,

I have prepared a ParametricPlot3D consisting
of two forms:
i. a closed sinusoidal 'ribbon'
ii. a plane annular ring

The following works ok:
In:= ParametricPlot3D[	{
{u Sin[t], u Cos[t], Sin[3t]},
{u Sin[t], u Cos[t], 0}
},
{t, -Pi, Pi}, {u, 0.9, 1.1},
Boxed -> False, Axes -> False, PlotPoints -> {200,2}]

My PROBLEM arises when trying to change the GrayLevel[] of the
two forms (independently). The following doesn't work:

In:= ParametricPlot3D[       {
{u Sin[t], u Cos[t], Sin[3t], GrayLevel[0.8]},
{u Sin[t], u Cos[t], 0, GrayLevel[0.2]}
},
{t, -Pi, Pi}, {u, 0.9, 1.1},
Boxed -> False, Axes -> False, PlotPoints -> {200,2}]

After saving the ParametricPlot3D into a "file", I use the command:

psfix "file" -epsf > "file.eps"

in order to use the plot into a LaTex file. The final graphic is of
a single GrayLevel ... unfortunately.

Do you know if there is any way to solve this problem?

thanks

```

• Prev by Date: Substitution of variables in differential equations
• Next by Date: Fwd: Generating lists of normally-distributed numbers?
• Previous by thread: Substitution of variables in differential equations
• Next by thread: Raster-Based Graphics