Re: Slow graphics
- To: mathgroup@smc.vnet.net
- Subject: [mg10325] Re: Slow graphics
- From: Paul Abbott <paul@physics.uwa.edu.au>
- Date: Thu, 8 Jan 1998 23:40:49 -0500
- Organization: University of Western Australia
- References: <67t7pr$f08@smc.vnet.net> <68k6nr$h2g$1@dragonfly.wolfram.com>
Al Hibbard wrote:
> Before calling these graphics, evaluate $FormatType = InputForm (default
> is StandardForm, which takes longer - I presume that you have text in
> your graphics?).
I can see no speed difference if there is no text in the graphics:
In[1]:= pts=Table[Random[],{10000},{2}];
In[2]:=
Block[{$FormatType=InputForm},Show[Graphics[{Line[pts]}]]];//Timing//First
Out[2]= 0.16 Second
In[3]:= $FormatType
Out[3]= StandardForm
In[4]:= Show[Graphics[{ Line[pts]}]];//Timing//First Out[4]= 0.16 Second
Cheers,
Paul
____________________________________________________________________
Paul Abbott Phone: +61-8-9380-2734
Department of Physics Fax: +61-8-9380-1014
The University of Western Australia Nedlands WA 6907
mailto:paul@physics.uwa.edu.au AUSTRALIA
http://www.pd.uwa.edu.au/~paul
God IS a weakly left-handed dice player
____________________________________________________________________