Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Problem with evaluating Graphics3D output

  • To: mathgroup at smc.vnet.net
  • Subject: [mg90957] Re: Problem with evaluating Graphics3D output
  • From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
  • Date: Thu, 31 Jul 2008 06:04:23 -0400 (EDT)
  • Organization: The Open University, Milton Keynes, UK
  • References: <g6rnsa$7jr$1@smc.vnet.net>

Cca wrote:

> Here is a problem I discovered right now. First, evaluate
> 
> Graphics3D[{FaceForm[{GrayLevel[0]}, {GrayLevel[0]}], 
>   Cylinder[{{-0.5, 0, 0}, {0.5, 0, 0}}, 0.05]}]
> 
> Now, evaluate the output. My problem: FaceForm is not preserved. Why? Confirming:
> 
> %[[1]]
> 
> How can I preserve FaceForm upon reevaluation?
> 
> This does not happen with
> 
> Graphics3D[{GrayLevel[0], 
>   Cylinder[{{-0.5, 0, 0}, {0.5, 0, 0}}, 0.05]}]

You may have found a bug. I could reproduce the issue on my Mac OS X 
6.0.3 system. Apparently the problem appears with GrayLevel only. I 
tried several variations of your expression (color scheme and geometric 
object) and FaceForm was preserved upon evaluation of the output cell. 
For instance,


     Graphics3D[{FaceForm[Yellow, Blue],
       Cylinder[{{-0.5, 0, 0}, {0.5, 0, 0}}, 0.05]}]

     [ Evaluate the output cell with shift + enter]

     %[[1]]

     {FaceForm[RGBColor[1, 1, 0], RGBColor[0, 0, 1]],
      Cylinder[{{-0.5, 0, 0}, {0.5, 0, 0}}, 0.05]}

Regards,
-- Jean-Marc


  • Prev by Date: Re: When is a List not a List?
  • Next by Date: Re: When is a List not a List?
  • Previous by thread: Problem with evaluating Graphics3D output
  • Next by thread: RowReduce for SparseArray