MathGroup Archive 2000

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

Search the Archive

Re: Rookie question ..

  • To: mathgroup at smc.vnet.net
  • Subject: [mg22527] Re: Rookie question ..
  • From: "Allan Hayes" <hay at haystack.demon.co.uk>
  • Date: Thu, 9 Mar 2000 03:24:17 -0500 (EST)
  • References: <8a519d$d8o@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Joe:

SurfaceOfRevolution[Sin[x], {x, 0, 2 Pi}]

Show[% /. {p__Polygon } -> {EdgeForm[], p}]

Or at one go:

Block[{$DisplayFunction = Identity},
SurfaceOfRevolution[Sin[x], {x, 0, 2 Pi}]/.{p__Polygon }->{EdgeForm[],p}
]//Show


Allan
---------------------
Allan Hayes
Mathematica Training and Consulting
Leicester UK
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565

"Joe Artale" <slip92 at pacbell.net> wrote in message
news:8a519d$d8o at smc.vnet.net...
> In Mathematica 3.0, can you do a SurfaceOfRevolution WITHOUT the mesh?
> ... I tried Mesh->False, no luck .. I turned the option off in
> Preferences but then lost the Box .. Any help is appreciated ..
>
> -joe
>



  • Prev by Date: Re: Problem with Integration
  • Next by Date: Re: Error in Subtraction with V4.0??
  • Previous by thread: Re: iterations, recursions and derivatives
  • Next by thread: Re: Rookie question ..