Re: mirror image of a square matrix
- To: mathgroup at smc.vnet.net
- Subject: [mg66347] Re: mirror image of a square matrix
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Wed, 10 May 2006 06:34:08 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <e3pean$ief$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
ravi wrote:
> Let me define the mirror image of a matrix as the operation of flipping
> the columns such that the last column becomes the first, the second
> last becomes the second and so on. I would like to know if this can be
> done simpler than as follows:
>
> mat=Table[Random[],{n},{n}]
> matR=Transpose[Reverse[Transpose[mat]]]
> Are there any built in functions for operations like these?
> /ravi
>
Hi Ravi,
You can *Map* [1] the *Reverse* function onto the matrix. For example
In[1]:=
m = {{1, 2, 3}, {4, 5, 6}, {7, 8, 9}};
In[2]:=
Reverse /@ m
Out[2]=
{{3, 2, 1}, {6, 5, 4}, {9, 8, 7}}
Best regards,
Jean-Marc
[1] http://documents.wolfram.com/mathematica/functions/Map