Re: Newbie question about column sums of arrays

• To: mathgroup at smc.vnet.net
• Subject: [mg68542] Re: [mg68508] Newbie question about column sums of arrays
• From: Sseziwa Mukasa <mukasa at jeol.com>
• Date: Wed, 9 Aug 2006 04:19:26 -0400 (EDT)
• References: <200608081029.GAA29659@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```On Aug 8, 2006, at 6:29 AM, George W. Gilchrist wrote:

> I have spent several hours trying to find an answer to what must be
> an incredibly simple problem: how to sum the columns of an array
> containing a random mix of +1 and -1s. For example:
>
> In[7]:=
> AA1=Array[x, {4,4}]/. x:> (-1)^Random[Integer]
>
>
> Out[7]=
> \!\(\*FormBox[
>    RowBox[{"(", "\[NoBreak]", GridBox[{
>          {\(1[1, 1]\), \(1[1, 2]\), \(\((\(-1\))\)[1, 3]\), \(1[1, 4]
> \)},
>          {\(1[2, 1]\), \(1[2, 2]\), \(\((\(-1\))\)[
>            2, 3]\), \(\((\(-1\))\)[2, 4]\)},
>          {\(1[3, 1]\), \(\((\(-1\))\)[3, 2]\), \(1[3, 3]\), \(1[3, 4]
> \)},
>          {\(\((\(-1\))\)[4, 1]\), \(1[4,
>            2]\), \(1[4, 3]\), \(\((\(-1\))\)[4, 4]\)}
>          },
>        RowSpacings->1,
>        ColumnSpacings->1,
>        ColumnAlignments->{Left}], "\[NoBreak]", ")"}],
>
> In[8]:=
> Total[AA1]
>
> Out[8]=
> {(-1)[4,1]+1[1,1]+1[2,1]+1[3,1],
>   (-1)[3,2]+1[1,2]+1[2,2]+1[4,2],
>   (-1)[1,3]+(-1)[2,3]+1[3,3]+1[4,3],
>   (-1)[2,4]+(-1)[4,4]+1[1,4]+1[3,4]}
>
>
> So, Total[] seems to do the right thing, but I cannot get the actual
> sums as real numbers, only this rather verbose representation. I have
> searched the manuals for just about everything I can think of with no

The problem is in your definition of AA1 (incidentally to avoid
letters).  Array is meant to take a function as its first argument
where the arguments to the function are the indices of the array
element.  It is used for constructing arrays whose element values are
functions of their position.  The easiest way to make your matrix,
whose elements do not depend on position is with Table:

In[38]:=
aa1=Table[(-1)^Random[Integer],{4},{4}]
Total[aa1]

Out[38]=
{{-1,-1,1,1},{-1,1,1,-1},{1,-1,1,-1},{-1,1,-1,-1}}

Out[39]=
{-2,0,2,-2}

Regards,

Ssezi

>
>
> Cheers, George
>
> ..................................................................
> George W. Gilchrist                        Email #1: gwgilc at wm.edu
> Department of Biology, Box 8795          Email #2: kitesci at cox.net
> College of William & Mary                    Phone: (757) 221-7751
> Williamsburg, VA 23187-8795                    Fax: (757) 221-6483
> http://gwgilc.people.wm.edu/
>
>

```

• Prev by Date: Re: Newbie question about column sums of arrays
• Next by Date: Re: Newbie question about column sums of arrays
• Previous by thread: Re: Newbie question about column sums of arrays
• Next by thread: Re: Newbie question about column sums of arrays