MathGroup Archive 2011

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

Search the Archive

Re: Time series minima and maxima


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