Re: graphics question
- To: mathgroup@smc.vnet.net
- Subject: [mg12532] Re: graphics question
- From: "Allan Hayes" <hay@haystack.demon.cc.uk>
- Date: Sat, 23 May 1998 18:10:59 -0400
- References: <6jpk27$535$9@dragonfly.wolfram.com>
Jrgen Tischer wrote in message <6jpk27$535$9@dragonfly.wolfram.com>... >Hi Tom, > >In[1]:= gr = Plot[2*x^2 - 4, {x, -5, 5}, GridLines -> Automatic] In[2]:= >Show[Graphics[FullGraphics[gr][[1,2]]]] > >Jrgen > >-----Original Message----- >From: Tom <toad@planet.eon.net> To: mathgroup@smc.vnet.net >Subject: [mg12532] [mg12414] graphics question ....... > Jurgen's solution clips the bottom frame tick numbers (at least for me). The following variant avoids this by keeping full value of the PlotRange option. gr = Plot[2*x^2 - 4, {x, -5, 5}, GridLines -> Automatic] Show[Graphics[{},FullOptions[gr]]] -- Allan Hayes Training and Consulting Leicester UK http://www.haystack.demon.co.uk hay@haystack.demon.co.uk voice: +44 (0)116 271 4198 fax: +44(0)116 271 8642