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
>