Re: Magic Matrices
- To: mathgroup at smc.vnet.net
- Subject: [mg32588] Re: Magic Matrices
- From: "Hans Michel" <hansjm at bellsouth.net>
- Date: Wed, 30 Jan 2002 03:19:08 -0500 (EST)
- References: <a2onju$5v3$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Flip: See: http://mathworld.wolfram.com/MagicSquare.html http://mathworld.wolfram.com/packages/MagicSquares.m Hans "Flip Flippy" <flip at safebunch.com> wrote in message news:a2onju$5v3$1 at smc.vnet.net... > Hi All, > > does anyone know of code for Mathematica to produce magic matrices? > > For example Magic[n] would produce an nxn matrix where all of the > row, column and diagonal sums are equal. > > As an example: > > Magic[3] would produce as output: > > {{8,1,6},{3,5,7},{4,9,2}}. > > > Thank you for any inputs, Flip > > > -- > Posted via Mailgate.ORG Server - http://www.Mailgate.ORG >