MathGroup Archive 2004

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

Search the Archive

Many thanks, again...

  • To: mathgroup at smc.vnet.net
  • Subject: [mg50340] Many thanks, again...
  • From: "1.156" <rob at pio-vere.com>
  • Date: Sat, 28 Aug 2004 04:37:52 -0400 (EDT)
  • References: <cgkg6v$g97$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

As usual the folks on this group delivered varied and very instructive 
ways to do the job.  Your suggestions
are good targets for me to attempt to understand -- and I don't yet, 
fully. 

Thanks very much for giving your time to help. 
Regards, Rob

1.156 wrote:

>I realize that many times some form of Mathematica built in array function will
>do the needed job.  Here I have a matrix containing individual data
>traces in rows y[[i]]. I want to make matrix containing the corresponding
>derivative signals in rows yd[[i]].  I get this done using the following
>For loop. Matrix yd has been initialized (it wouldn't work with out it).
>
>For[i = 1, i < n, i++, yd[[i]] = Drop[RotateLeft[y[[i]]] - y[[i]], -1]];
>
>I tried the obvious (to me):
>yd = Drop[RotateLeft[y] -y, -1];
>
>But I get garbage.  It seems the whole matrix has been flattened to a
>single list and the whole list is rotated --instead of doing it row
>by row as I need.
>
>Wizzards all: is there some slick way to do this without the For loop?
>If so, it's probably faster and sure would look better in the code.
>Suggestions appreciated as usual.
>
>Rob
>
>  
>


  • Prev by Date: Timing anomaly
  • Next by Date: New webMathematica site: www.eco-tools.net
  • Previous by thread: Timing anomaly
  • Next by thread: New webMathematica site: www.eco-tools.net