Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

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

Search the Archive

Re: Union, Sort at different levels of a list

  • To: mathgroup at smc.vnet.net
  • Subject: [mg65690] Re: Union, Sort at different levels of a list
  • From: "Chris Chiasson" <chris.chiasson at gmail.com>
  • Date: Sun, 16 Apr 2006 01:44:46 -0400 (EDT)
  • References: <e1nn4v$lm8$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

How about

Block[{n=3},
  Union[Sort/@
      Flatten[Table[

Distribute[{{i,j},{k,l}},List],{i,1,n},{j,1,n},{k,1,n},{l,1,n}],
        4]]]

or

<<DiscreteMath`Combinatorica`
Block[{n=3},KSubsets[Range[n],2]]

?


  • Prev by Date: unable to FullSimplify
  • Next by Date: Re: ViewPoint selector
  • Previous by thread: Union, Sort at different levels of a list
  • Next by thread: Re: Union, Sort at different levels of a list