Re: Joining matrices
- To: mathgroup at smc.vnet.net
- Subject: [mg5748] Re: [mg5738] Joining matrices
- From: Allan Hayes <hay at haystack.demon.co.uk>
- Date: Tue, 14 Jan 1997 10:42:27 -0500
- Sender: owner-wri-mathgroup at wolfram.com
Jean-Francois Alcover <70763.411 at compuserve.com>
[mg5738] Joining matrices
writes
>i have to join 2 or more matrices line by line
>for example : joinmat[{{{1,2},{3,4}},{{10,20},{30,40}}}]
> --> {{1,2,10,20},{3,4,30,40}}
>
>i have tried Transpose [Flatten[Transpose /@ ListOfMatrices,1]]
>but it seems rather slow
>can anyone help me with a faster solution ?
Jean-Francois,
lm ={{{1,2},{3,4}},{{10,20},{30,40}}};
MapThread[Join, lm]
{{1, 2, 10, 20}, {3, 4, 30, 40}}
This seems to be 3 to 4 times as fast.
Allan Hayes,
hay at haystack.demon.co.uk
http://www.haystack.demon.co.uk