Hi Robinou,
When you said multiplication of matrices, are you talking about the cell-to-cell operation; Or, in the sense of "dot product"?
If later, you can try the following script:///////////////////////
range m1=[MBook1]1!1;
range m2=[MBook2]1!1;
nc1=m1.ncols; nr1=m1.nrows;
nc2=m2.ncols; nr2=m2.nrows;
if(nc1!=nr2) {
type -a Two matrices are not compatible for dot product;
return;
}
win -t m; //create output matrix
mbname$=%H;
range m3=[mbname$]1!1;
m3.nrows=nr1;
m3.ncols=nc2;
Loop(ii,1,nr1) {
Loop(jj,1,nc2) {
v=0;
Loop(kk,1,nc1) {v+=(m1[ii,kk]*m2[kk,jj])}
m3[ii,jj]=v;
}
}
///////////////////////
For large matrices, this script may be too slow, and you might want to consider faster way such as in Origin C.
--Hideo Fujii
OriginLab
