Suggest faster & better ways to flatten varying lengths of matrices

uday_guntupalli

All, 
   While I know of a way to do this, I dont think it is the most efficient way. Any thoughts to make this more efficient ? 

 

Matrix1 = [1,2,3,4,5]; 
Matrix2 = [2,3,5]; 
Matrix3 = [7,8,9,10]; 

ColAVals = {};
ColBVals = {}; 
ColCVals = {};
for(i = 1, i <= N rows(Matrix1), i++,
		for(r = 1, r <= N rows(Matrix2), r++,
				for(s = 1, s <= N rows(Matrix3), s++,
						Insert Into(ColAVals,Matrix1[i]); 
						Insert Into(ColBVals,Matrix2[r]); 
						Insert Into(ColCVals,Matrix3[s]); 
				   );
		   );
   ); 
   
Show(ColAVals);
Show(ColBVals); 
Show(ColCVals);

dt = New Table("Test"); 
dt << New Column("A",Numeric,Continuous, << set Values(ColAVals))
   << New Column("B",Numeric,Continuous, << set Values(ColBVals))
   << New Column("C",Numeric,Continuous, << set Values(ColCVals));

Jeff_Perkinson

This method does seem to be relatively quick.

nmat = 15;
matrices = {};
For( i = 1, i <= nmat, i++,
	matrices[i] = J( Random Integer( 5 ), 1, Random Uniform() )
);

start = Tick Seconds();
m1 = As Table( matrices[1] );
m2 = As Table( matrices[2] );
dt = m1 << Join( With( m2 ), Cartesian Join, private );
Close( m1, nosave );
Close( m2, nosave );

For( i = 3, i < N Items( matrices ), i++,
	mi = As Table( matrices[i] );
	dt = dt << Join( With( mi ), Cartesian Join, private );
	Close( mi, nosave );
);
mlast = As Table( matrices[N Items( matrices )] );
dt = dt << Join( With( mlast ), Cartesian Join );
Close( mlast, nosave );

end = Tick Seconds();
total = end - start;
Show( total );

 

By the way, be careful with Cartesian joins, they get big really fast.