Re: Re: Speed of dot product in Mathematica
- To: mathgroup at smc.vnet.net
- Subject: [mg5403] Re: [mg5350] Re: [mg5230] Speed of dot product in Mathematica
- From: Allan Hayes <hay at haystack.demon.co.uk>
- Date: Thu, 5 Dec 1996 14:50:36 -0500
- Sender: owner-wri-mathgroup at wolfram.com
Twice as fast and simpler than my previous posting is the following
variant of Michael Trott's code - using Range instead of Table.
SteppedTake2[list_, {start_, finish_, step_}]:=
list[[Range[start,finish, step]]]
Timings
SteppedTake[list, {20,9000,5}];//Timing (*my previous*)
SteppedTake2[list, {20,9000,5}];//Timing
Allan Hayes
hay at haystack.demon.co.uk
http://www.haystack.demon.co.uk