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