Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2001

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

Search the Archive

RE: Drawing transparent objects.

  • To: mathgroup at
  • Subject: [mg30237] RE: [mg30189] Drawing transparent objects.
  • From: "David Park" <djmp at>
  • Date: Fri, 3 Aug 2001 00:56:06 -0400 (EDT)
  • Sender: owner-wri-mathgroup at


You need the WireFrame routine in the Shapes package. Here is an example of
a wireframe sphere around a solid cuboid.


sphere[p_, t_] := Sqrt[3]*{Cos[t]*Cos[p], Sin[t]*Cos[p], Sin[p]}

Show[Graphics3D[{Cuboid[{-1, -1, -1}, {1, 1, 1}]}],
   WireFrame[ParametricPlot3D[Evaluate[sphere[p, t]],
     {p, -Pi, Pi}, {t, 0, 2*Pi}, DisplayFunction ->
      Identity]], DisplayFunction -> $DisplayFunction];

It is a little less convoluted with my DrawingCube package.


    {Cuboid[{-1, -1, -1}, {1, 1, 1}],
     UseWireFrame[ParametricDraw3D[Evaluate[sphere[p, t]],
       {p, -Pi, Pi}, {t, 0, 2*Pi}]]}]];

David Park
djmp at

> From: Johannes Ludsteck
To: mathgroup at
> [mailto:johannes.ludsteck at]
> Dear MathGroup members,
> I would like to draw transparent three-
> dimensional objects
> (cuboids, graphs of functions and such things),
> i.e. objects with unfilled mesh.
> I searched the Mathematica book for a option or
> graphics directive, but didn't find one.
> Is there a simple way solve the problem or have I
> to do this by defining the graphics objects by
> hand?
> Thanks for your help and best regards,
> 	Johannes Ludsteck
> <><><><><><><><><><><><><><><><><><>
> Johannes Ludsteck
> Institut fuer Volkswirtschaftslehre
> Lehrstuhl Prof. Dr. Moeller
> Universitaet Regensburg
> Universitaetsstrasse 31
> 93053 Regensburg
> Tel +49/0941/943-2741

  • Prev by Date: AW: Drawing transparent objects.
  • Next by Date: Re: Any quantum chemists / physicists?
  • Previous by thread: Re: Drawing transparent objects.
  • Next by thread: Re: Cube to Dodecahedron