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[7]:= 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[7]:= 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