RE: Building a list

• To: mathgroup at smc.vnet.net
• Subject: [mg47137] RE: [mg47114] Building a list
• From: "David Park" <djmp at earthlink.net>
• Date: Sat, 27 Mar 2004 01:34:40 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```Mark,

xlist = {x1, x2, x3};

Outer[f[a, b, #1, #2] &, xlist, xlist]
{{f[a, b, x1, x1], f[a, b, x1, x2], f[a, b, x1, x3]}, {f[a, b, x2, x1],
f[a, b, x2, x2], f[a, b, x2, x3]}, {f[a, b, x3, x1], f[a, b, x3, x2],
f[a, b, x3, x3]}}

David Park

From: Mark Coleman [mailto:mark at markscoleman.com]
To: mathgroup at smc.vnet.net

Greetings,

I've got a relatively simple function f[a_,b_,c_,d_], where a and b are
integers and c and d are lists (of reals), and f returns a real.

I need to evaluate f on (potentially long) sets of lists and calculate
a square "matrix" from the possible permutations of the elements in the
lists. For instance

If

xlist={x1,x2,x3}

I need to calculate

{{f[a,b,x1,x1],f[a,b,x1,x2],f[a,b,x1,x3]},{f[a,b,x2,x1],f[a,b,x2,x2],f[a
,b,x2,x3]},{f[a,b,x3,x1],f[a,b,x3,x2],f[a,b,x3,x3]}}

Note that f[a,b,c,d] does not equal f[a,b,d,c].

My first reaction was that Outer[] might do this, but I cannot seem to
get it to work. I'd appreciate any suggestions.

Thanks,

Mark

```

• Prev by Date: Re: Building a list
• Next by Date: Re: Building a list
• Previous by thread: Re: Building a list
• Next by thread: RE: Building a list