[Date Index] [Thread Index] [Author Index]

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
>