Timing?
- To: mathgroup at smc.vnet.net
- Subject: [mg62229] Timing?
- From: "Ray Koopman" <koopman at sfu.ca>
- Date: Wed, 16 Nov 2005 02:28:30 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Has anyone else observed anything like the following sequence of
Timing results?
In[1]:= L = Array[Random[Integer,{-10,10}]&,{10^6,2}];
t = Table[First[Timing[Pick[L,Total@Transpose@Sign@L,-2];]/.
Second->100],{100}]
Out[2]= { 86., 89., 95.,106.,119.,132.,147.,160.,168.,179.,
190.,198.,201.,212.,219.,223.,228.,228.,232.,233.,
234.,228.,238.,236.,236.,239.,236.,241.,242.,243.,
239.,234.,241.,243.,239.,241.,238.,242.,238.,239.,
238.,226.,239.,243.,240.,238.,236.,242.,240.,241.,
240.,238.,239.,240.,241.,239.,239.,242.,241.,240.,
241.,237.,238.,242.,240.,239.,243.,238.,239.,230.,
239.,240.,240.,238.,237.,242.,239.,241.,240.,241.,
240.,239.,236.,236.,241.,241.,241.,237.,241.,239.,
241.,239.,239.,241.,243.,240.,239.,234.,237.,243.}
In[3]:= ListPlot[t,PlotRange->All,Frame->True,Axes->None];