Re: direct product of two sets

• To: mathgroup at smc.vnet.net
• Subject: [mg53283] Re: [mg53264] direct product of two sets
• From: Tomas Garza <tgarza01 at prodigy.net.mx>
• Date: Tue, 4 Jan 2005 03:13:21 -0500 (EST)
• References: <200501030929.EAA10701@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

Perhaps this will help:

In[1]:=
a = {a1, a2, a3};
b = {b1, b2, b3};

In[5]:=
Flatten[Outer[List, a, b], 1]
Out[5]=
{{a1, b1}, {a1, b2}, {a1, b3}, {a2, b1}, {a2, b2},
{a2, b3}, {a3, b1}, {a3, b2}, {a3, b3}}

Tomas Garza
Mexico City
----- Original Message -----
From: "Cong" <vo.chi.cong at is.titech.ac.jp>
To: mathgroup at smc.vnet.net
Subject: [mg53283] [mg53264] direct product of two sets

> Hello!
>
> Give 2 finite sets A and B, how can I compute their direct product
> A x B := {(a,b) : a\in A, b\in B}
>
> Can someone help me?
>
> Best Regards,
>
> Cong
>
>



• Prev by Date: FindMinimum -- MaxIterations
• Next by Date: Re: direct product of two sets
• Previous by thread: direct product of two sets
• Next by thread: Re: direct product of two sets