Re: Plus sets in mathematica..?

• To: mathgroup at smc.vnet.net
• Subject: [mg75955] Re: [mg75927] Plus sets in mathematica..?
• Date: Mon, 14 May 2007 03:32:43 -0400 (EDT)
• References: <200705130954.FAA04136@smc.vnet.net>

```There are several solutions...

In[1]:=A = {1, 2, 3}; B = {40, 50, 60, 70};
Join @@ (#1 + A & ) /@ B
Out[1]={41, 42, 43, 51, 52, 53, 61, 62, 63, 71, 72, 73}

In[2]:=Join @@ Outer[Plus, B, A]
Out[2]={41, 42, 43, 51, 52, 53, 61, 62, 63, 71, 72, 73}

In[3]:=Flatten[Outer[Plus, B, A]]
Out[3]={41, 42, 43, 51, 52, 53, 61, 62, 63, 71, 72, 73}

On 5/13/07, changbo <e-changbo at hanmail.net> wrote:
>
> I want to make a function "f", its domain is every thinkable two sets, and
> the result is  {a+b | a=E2=88=88A,b=E2=88=88B} for A,B.
>
> ex) A={1,2,3}, B={40,50,60,70},
> then I have f[A,B] as
> {41,42,43,51,52,53,61,62,63,71,72,73}.
>
> How can I construct function "f"? Let me know the source.. Thank you very
> much
>
>

```

• Prev by Date: Re: Plus sets in mathematica..?
• Next by Date: Re: Plus sets in mathematica..?
• Previous by thread: Re: Plus sets in mathematica..?
• Next by thread: Re: Plus sets in mathematica..?