Re: column * row ??(2)
- To: mathgroup at smc.vnet.net
- Subject: [mg28846] Re: column * row ??(2)
- From: "Allan Hayes" <hay at haystack.demon.co.uk>
- Date: Tue, 15 May 2001 00:59:20 -0400 (EDT)
- References: <9dlcc6$o2p@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
I should have added the following alternative way of dealing with the
problem arising from the attribute Flat noted at the end of my previous
posting on this topic.
ClearAttributes[GCD, {Listable, Protected}]
SetAttributes[GCD,{OneIdentity}]
GCD[x_List]:= GCD@@x
GCD[{3,6}]
3
Protect[GCD];
--
Allan
---------------------
Allan Hayes
Mathematica Training and Consulting
Leicester UK
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565
"J.R. Chaffer" <jrchaff at mcn.net> wrote in message
news:9dlcc6$o2p at smc.vnet.net...
> Hi there,
>
> Can someone tell me a way to mimic the building of
> an N x N matrix by multiplying a column vector
> on left times a row vector on right ? (both vectors
> of length N) - I mean in Mathematica, of course.
>
> i.e, want the result,
>
> (colvec){a1,a2, .. aN} * (rowvec){b1,b2,..bN} =
>
> result is matrix:
>
> {{a1*b1 a1*b2 ..... a1*bN},
> {a2*b1 a2*b2 ..... a2*bN},
> ... ... ... ,
> {aN*b1 aN*b2 ..... aN*bN}}
>
>
> When I try this in Mathematica all I can figure out
> how to produce is the standard dot-product. If I
> try the 'transposed' lists/matrices, I get an error,
> even tho the product is defined by basic rules of
> matrix multiplication.
>
> Thanks,
>
> John Chaffer
>