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

MathGroup Archive 2011

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

Search the Archive

Re: Time series minima and maxima

  • To: mathgroup at smc.vnet.net
  • Subject: [mg115921] Re: Time series minima and maxima
  • From: Jagra <jagra24891 at mypacks.net>
  • Date: Wed, 26 Jan 2011 05:03:53 -0500 (EST)
  • References: <ihm4nf$kgv$1@smc.vnet.net>

Looks like I pasted an extra line in the findMinimaMaxima function it
should read:

findMinimaMaxima[data_, window_] := With[{k = window}, data[[k +
Flatten[Position[Partition[data[[All, 2]], 2 k + 1, 1], x_List /;
x[[k + 1]] < Min[Delete[x, k + 1]] || x[[k + 1]] > Max[Delete[x, k +
1]]]]]]]


  • Prev by Date: Re: Mathematica 20x slower than Java at arithmetic/special functions, is
  • Next by Date: Experimental`'NumericalFunction''
  • Previous by thread: Time series minima and maxima
  • Next by thread: Re: Time series minima and maxima