performance - Perl fast matrix multiply -


i have implemented following statistical computation in perl http://en.wikipedia.org/wiki/fisher_information.
results correct. know because have 100's of test cases match input , output. problem need compute many times every single time run script. average number of calls function around 530. used devel::nytprof find out out slow parts are. have optimized algorithm traverse top half of matrix , reflect onto bottom same. i'm not perl expert, need know if there can try speed perl. script distributed clients compiling c file not option. there perl library can try? needs sub second in speed if possible.

more information $matrixref matrix of floating point numbers $rows $variables. here nytprof dump function. 

#----------------------------------------------- # #----------------------------------------------- sub computexpx # spent 4.27s within computexpx called 526 times, avg 8.13ms/call: # 526 times (4.27s+0s) computeefficiency @ line 7121, avg 8.13ms/call { 526 0s                  ($matrixref, $rows, $variables) = @_;  526 0s                  $r = 0; 526 0s                  $c = 0; 526 0s                  $k = 0; 526 0s                  $sum = 0; 526 0s                  @xpx = ();  526 11.0ms              ($r = 0; $r < $variables; $r++)                         { 14202   19.0ms                @temp = (0) x $variables; 14202   6.01ms                push(@xpx, \@temp); 526 0s                  } 526 7.01ms              ($r = 0; $r < $variables; $r++)                         { 14202   144ms                   ($c = $r; $c < $variables; $c++)                                 { 198828  43.0ms                                  $sum = 0;                                         #for ($k = 0; $k < $rows; $k++) 198828  101ms                           foreach $rowref (@{$matrixref})                                         {                                                 #$sum += $matrixref->[$k]->[$r]*$matrixref->[$k]->[$c]; 6362496 3.77s                                   $sum += $rowref->[$r]*$rowref->[$c];                                         }  198828  80.1ms                                  $xpx[$r]->[$c] = $sum;                                                 #reflect on other side of matrix 198828  82.1ms                                  $xpx[$c]->[$r] = $sum if ($r != $c); 14202   1.00ms                          } 526 2.00ms                  }  526 2.00ms                  return \@xpx; }

since each element of result matrix can calculated independently, should possible calculate some/all of them in parallel. in other words, none of instances of innermost loop depend on results of other, run simultaneously on own threads.


Comments

Post a Comment

Popular posts from this blog

jquery - How can I dynamically add a browser tab? -

since using iframes house external pages are, accounts "not preferred method" , disallowed sites (flickr, one), want dynamically generate browser tabs. e.g., when user submits form, want dynamically generate tab on browser in response submitted. e.g., might want add new tab url like: http://www.bigsurgarrapata.com/contact how in jquery? you want form target attribute action attribute. http://www.w3schools.com/tags/att_form_target.asp browsers have ultimate control on result of target attribute open new tab value of _blank. <form action="contact_submit.php" target="_blank" method="post">
Read more

keyboard - C++ GetAsyncKeyState alternative -

i using windows.h library's getasynckeystate function define key pushed on keyboard . here program returns int value of pushed key example. #include <iostream> #include <windows.h> using namespace std; int main (){ char i; for(i=8;i<190;i++){ if(getasynckeystate(i)== -32767){ cout<<int (i)<<endl; } } return 0; } but trying make opengl simple game , function appeared slow . there function not need cycle 180 times , if statement . thanks you're trying make opengl game, you're going use glfw. if that's case can away using glfwgetkey() such: if (glfwgetkey(glfw_key_up) == glfw_press) {...} if (glfwgetkey(glfw_key_down) == glfw_press) {...} that method nicely explained in tutorial 6 opengl-tutorial.org . should start first tutorial of beginners tutorials , later intermediate tutorials . if you're going make win32 window can listen wm_keydown or wm_keyup messages , virtua
Read more

android - java.net.UnknownHostException(Unable to resolve host “URL”: No address associated with hostname) -

i developing app testing asp.net webservice in android.for simple webservice adding 2 numbers used.where numbers passed parameters.the result in dialogue.the webserver works in local. when application runs following result exception.i provided internet permission in manifest. java.net.unknownhostexception(unable resolve host “ http://url.com/ ”: no address associated hostname) my code given below main activity public static string rslt=""; /** called when activity first created. */ @override public void oncreate(bundle savedinstancestate) { super.oncreate(savedinstancestate); setcontentview(r.layout.activity_main); button b1=(button)findviewbyid(r.id.button1); final alertdialog ad=new alertdialog.builder(this).create(); b1.setonclicklistener(new onclicklistener() { @override public void onclick(view arg0) { // todo auto-generated method stub try {
Read more