Services & ResourcesWolfram ForumsMathGroup Archive

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

RV: Re: Trouble Getting Graphic Primitives in a Module to Display with Show Command

• To: mathgroup at smc.vnet.net
• Subject: [mg125461] RV: Re: Trouble Getting Graphic Primitives in a Module to Display with Show Command
• From: "E. Martín-Serrano" <eMartinSerrano at telefonica.net>
• Date: Wed, 14 Mar 2012 00:44:15 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <17979570.11446.1331544406716.JavaMail.root@m06> <201203130808.DAA12921@smc.vnet.net>

Sorry,

The actual function is

vprange[br_] := ({-1, 1} #) & /@ (br/(2.0 Max[br]))
Print["for box ratios  ", N[#], " The view point  is ",   vprange[#]] & /@
{{1, 1, .4}, {1, 1, 1}, {1, 2, 1/2}};


-----Mensaje original-----
De: E. Mart=EDn-Serrano [mailto:eMartinSerrano at telefonica.net]
Enviado el: martes, 13 de marzo de 2012 12:05
Para: 'mathgroup at smc.vnet.net'
Asunto: RE: Re: Trouble Getting Graphic Primitives in a Module to
Display with Show Command

BTW,  in page  196  of  "The Mathematica Graphics Book - Cameron Smith &
Nancy Blanchman  - 1995", (for v 2.2),  there is the following function
which relates 'BoxRatios to ViewPoint'

vprange[br_] := ({-1, 1} #) & /@ (b r/(2.0 Max[br]))

Print["for box ratios  ", N[#], " The view point  is ",    vprange[#]] & /@
{{1, 1, .4}, {1, 1, 1}, {1, 2, 1/2}};

I found this function while trying to extract the ViewPoint (resulting)
setting on a 3D plot after having manipulate it interactively. I wanted to
restore the point view to a convenient "starting" setting by clicking on an
ad-hoc reset button.

I could not spend much time on it since I was unable to make it work and
thought that something had been changed since 1995.

Any suggestion would be appreciate.

Regards.

E. martin-Serrano


-----Mensaje original-----
De: djmpark [mailto:djmpark at comcast.net] Enviado el: martes, 13 de marzo de
2012 9:09
Para: mathgroup at smc.vnet.net
Asunto: Re: Trouble Getting Graphic Primitives in a Module to
Display with Show Command

<The problem is that the behavior of Mathematica with respect to the display
of Graphics has changed since Nancy wrote her book. The display of graphics
used to be a side <effect and the notebook output was uninteresting and so
was suppressed with a ";".  Now the display is the directly generated output
and you no longer want to suppress it. So <just use (without the terminating
<semicolon):

• References:
  • Re: Trouble Getting Graphic Primitives in a Module to Display with Show Command
    • From: "djmpark" <djmpark@comcast.net>