Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1995
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1995

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

Search the Archive

Re: Q:Hidden lines as dashed?

  • To: mathgroup at christensen.cybernetics.net
  • Subject: [mg1156] Re: [mg1108] Q:Hidden lines as dashed?
  • From: Allan Hayes <hay at haystack.demon.co.uk>
  • Date: Sat, 20 May 1995 01:13:20 -0400

Honoh Suzuki <i79922a at kyu-cc.cc.kyushu-u.ac.jp> writes in [mg1108]

> I'd like to draw 3D figures with hidden lines shown as dashed
> lines.

Here is an rough and ready way.

Needs["Graphics`Shapes`"]

cone = Show[Graphics3D[Cone[]], Boxed -> False]

wf = Show[WireFrame[cone]]

Show[cone, Epilog -> {Dashing[{.005,.02}],First[Graphics[wf]]}]

Explanation:
Graphics [wf] projects wr to a visually equivalent Graphics object  
( Epilog takes 2D primitives);
First extracts the primitives ;
then the Dashing directive is supplied (it works in this simple way  
because no Dashing occurs in wr -- if it did then you would need  
use replacement).

Warning: the lines from wr actually lie over the ones from cone.

Allan Hayes
hay at haystack.demon.co.uk






  • Prev by Date: Re: MathLink and CodeWarrior
  • Next by Date: Re: Q: How to load packages inside a package
  • Previous by thread: Q:Hidden lines as dashed?
  • Next by thread: Bivariate Normal Probs.