Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

PDL: efficient self-referencing math?

by BrowserUk (Pope)
on Sep 04, 2011 at 07:37 UTC ( #924046=perlquestion: print w/ replies, xml ) Need Help??
BrowserUk has asked for the wisdom of the Perl Monks concerning the following question:

Can pdl efficiently(*) perform the equivalent of the following operation on a piddle?

$pdl[ $_ -1 ] -= $pdl[ $_ ] for reverse 1 .. $#pdl;

(*)Ie. Without converting every element to a perl var, perform the math and then convert the result back, and assign it back.


Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

Comment on PDL: efficient self-referencing math?
Download Code
Re: PDL: efficient self-referencing math?
by Corion (Pope) on Sep 04, 2011 at 08:02 UTC

    I haven't used PDL at all, but maybe you have enough dimensions in your piddle to make the following approach efficient:

    1. Create a matrix to calculate the shifted, negative piddle (can be cached)
    2. Multiply the source piddle by the matrix to create the shifted negative source piddle
    3. Add the source piddle and the new piddle

    The matrix would be (or, would be)

    ( 0 0 0 ...) ( -1 0 0 ...) ( 0 -1 0 ...) ( 0 0 -1 ...) ...

    Reading from the PDL documentation, basically the following code should work (while PDL is installing):

    # 4 dimensions my $matrix = pdl([[0,0,0,0],[-1,0,0,0],[0,-1,0,0],[0,0,-1,0]]); my $pdl = pdl(...); my $diff = $pdl x $matrix; # not sure about whether to use left- or ri +ght-multiplication here my $res = $pdl + $diff;

      That's an interesting approach.

      My piddle is just a 1D vector so maybe if I create a second 1D vector that is a copy of the first minus the first element, I can just subtract one from the other and produce the result I need?

      Hm. Need to play.


      Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
      "Science is about questioning the status quo. Questioning authority".
      In the absence of evidence, opinion is indistinguishable from prejudice.
Re: PDL: efficient self-referencing math?
by Anonymous Monk on Sep 04, 2011 at 14:54 UTC
    If a piddle happens, put the puppy outside at once.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://924046]
Approved by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (9)
As of 2014-08-01 06:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (257 votes), past polls