Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Using Select

  • To: mathgroup at smc.vnet.net
  • Subject: [mg97408] Re: Using Select
  • From: Raffy <raffy at mac.com>
  • Date: Thu, 12 Mar 2009 05:43:12 -0500 (EST)
  • References: <gpacsh$ms3$1@smc.vnet.net>

Do[r1 = Pick[data, Unitize[Clip[dataEval[[All, 1]], {0, 0}, {0, 1}]],
1], {1000}] // Timing
Do[r2 = data[[Pick[Range[Length[data]], dataEval[[All, 1]], x_ /; x >
0]]], {1000}] // Timing
Do[r3 = Pick[data, dataEval[[All, 1]], Except[0, _Integer]],
{1000}] // Timing
Do[r4 = Pick[data, dataEval[[All, 1]], x_ /; x > 0], {1000}] // Timing
Do[r5 = Extract[data,Position[dataEval[[All, 1]], x_ /; x > 0]],
{1000}] // Timing
r1 == r2 == r3 == r4 == r5

The winner fluctuates based on the size of data.


  • Prev by Date: Re: Compile for different parameter types
  • Next by Date: Re: L-shaped ListContourPlot
  • Previous by thread: Re: Using Select
  • Next by thread: Re: Using Select