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

```

• Prev by Date: Re: mirror image of a square matrix
• Next by Date: NDSolve system of partial eqn
• Previous by thread: Re: mirror image of a square matrix
• Next by thread: How to set up "Do" or "While" loops for several seperate commands