Re: Plus sets in mathematica..?

*To*: mathgroup at smc.vnet.net*Subject*: [mg75955] Re: [mg75927] Plus sets in mathematica..?*From*: "Adriano Pascoletti" <adriano.pascoletti at dimi.uniud.it>*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} Adriano Pascoletti 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 > >

**References**:**Plus sets in mathematica..?***From:*changbo <e-changbo@hanmail.net>