Re: unpartition
- To: mathgroup at smc.vnet.net
- Subject: [mg45932] Re: unpartition
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Fri, 30 Jan 2004 04:15:58 -0500 (EST)
- Organization: Universitaet Leipzig
- References: <bvaonb$a25$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi, ll=Partition[Table[4*(i - 1) + j, {i, 4}, {j, 4}],{2,2}]; Join @@ Transpose[ Partition[ Join @@@ Partition[ Flatten[Transpose[ll, {2, 3, 1, 4}], 2], 2], 2] ] Regards Jens Steven Burger wrote: > > How do you unpartition a matrix? > > For example: Starting with, > > Partition[Table[4*(i - 1) + j, {i, 4}, {j, 4}],{2,2}] > > how do you go back to, > > Table[4*(i - 1) + j, {i, 4}, {j, 4}]