MathGroup Archive 1995

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: I'm looking for an algorithm: Cartesian Product

  • To: mathgroup at christensen.cybernetics.net
  • Subject: [mg1677] Re: [mg1644] I'm looking for an algorithm: Cartesian Product
  • From: Bernhard Hahn <bmhahn at poseidon.knoware.nl>
  • Date: Tue, 11 Jul 1995 06:17:21 -0400

This might be what you are looking for:

In[1]:=
Outer[f, {a1, a2}, {b1, b2, b3}, {z1, z2}] // Flatten

Out[1]=
{f[a1, b1, z1], f[a1, b1, z2], f[a1, b2, z1],
  f[a1, b2, z2], f[a1, b3, z1], f[a1, b3, z2],
  f[a2, b1, z1], f[a2, b1, z2], f[a2, b2, z1],
  f[a2, b2, z2], f[a2, b3, z1], f[a2, b3, z2]}


Bernhard
---
----------------------------------------------------------
Bernhard M. Hahn        Tel:    +31-(0)3430-13321
Buntlaan 13             Fax:    +31-(0)3430-13321
3941 MG Doorn           Email:  bmhahn at poseidon.knoware.nl
The Netherlands                 (NeXTmail & MIME Welcome!)
                                PGP public key available
----------------------------------------------------------


  • Prev by Date: Re: I'm looking for an algorithm: Cartesian Product
  • Next by Date: Re: Crossreference, code documentation
  • Previous by thread: Re: I'm looking for an algorithm: Cartesian Product
  • Next by thread: Re: I'm looking for an algorithm: Cartesian Product