Re: Newbie question about column sums of arrays

• To: mathgroup at smc.vnet.net
• Subject: [mg68548] Re: [mg68508] Newbie question about column sums of arrays
• From: "Bharat Bhole" <bbhole at gmail.com>
• Date: Wed, 9 Aug 2006 04:20:10 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```George, the following works if you want to use Arrays and the replacement
rule. Instead of replacing x, replace the whole expression x[_,_].

In1: AA1=Array[x, {4,4}]/. x[_,_] :> (-1)^Random[Integer]
In2: Total[AA1]

Hope this helps.

Bharat.

On 8/8/06, George W. Gilchrist <gwgilc at wm.edu> 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
>
>
> 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/
>
>
>

--
----------------------------------------------------------
"No problem can withstand the assault
of sustained thinking."
Voltaire
----------------------------------------------------------

```

• 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