[R] permutation

[Pauline Gu]

Greg, Thank you so much for your help.

Pauline

At 09:54 PM 11/25/2002 -0500, Warnes, Gregory R wrote:
>The gregmisc package contains a function 'perumutations' which generates all
>permutations of n choose r.  It also contains 'combinations' which generates
>all combinations, and which appears to match your example:
>
>
> > library(gregmisc)
>Loading required package: MASS
>
>Attaching package `gregmisc':
>
>
>         The following object(s) are masked from package:base :
>
>          lowess
>
> > permutations(n=4,r=4)
>       [,1] [,2] [,3]
>  [1,]    1    2    3
>  [2,]    1    2    4
>  [3,]    1    3    2
>  [4,]    1    3    4
>  [5,]    1    4    2
>  [6,]    1    4    3
>  [7,]    2    1    3
>  [8,]    2    1    4
>  [9,]    2    3    1
>[10,]    2    3    4
>[11,]    2    4    1
>[12,]    2    4    3
>[13,]    3    1    2
>[14,]    3    1    4
>[15,]    3    2    1
>[16,]    3    2    4
>[17,]    3    4    1
>[18,]    3    4    2
>[19,]    4    1    2
>[20,]    4    1    3
>[21,]    4    2    1
>[22,]    4    2    3
>[23,]    4    3    1
>[24,]    4    3    2
> > combinations(n=4,r=3)
>      [,1] [,2] [,3]
>[1,]    1    2    3
>[2,]    1    2    4
>[3,]    1    3    4
>[4,]    2    3    4
>
>See the help pages for details.
>
>-Greg
>
> > -----Original Message-----
> > From: Pauline Gu [mailto:gu4 at llnl.gov]
> > Sent: Monday, November 25, 2002 7:55 PM
> > To: r-help at stat.math.ethz.ch
> > Subject: [R] permutation
> >
> >
> > Dear R experts,
> >
> > Is there any function in R that I can calculate the
> > permutation lists?  I
> > would like to know if there is any generic one for finding all the
> > permutation of n choose k?
> >
> > For example:
> >
> > perms <- list(1:2)
> > perms <- add.ttt(3:4, perms)
> > should give me
> >  > perms
> > [[1]]
> > [1] 3 4 1 2
> >
> > [[2]]
> > [1] 3 1 4 2
> >
> > [[3]]
> > [1] 3 1 2 4
> >
> > and perms <- add.ttt(5:6, perms)
> > should give me:
> > [[1]]
> > [1] 5 6 3 4 1 2
> >
> > [[2]]
> > [1] 5 3 6 4 1 2
> >
> > [[3]]
> > [1] 5 3 4 6 1 2
> >
> > [[4]]
> > [1] 5 3 4 1 6 2
> >
> > [[5]]
> > [1] 5 3 4 1 2 6
> >
> > [[6]]
> > [1] 5 6 3 1 4 2
> >
> > [[7]]
> > [1] 5 3 6 1 4 2
> >
> > [[8]]
> > [1] 5 3 1 6 4 2
> >
> > [[9]]
> > [1] 5 3 1 4 6 2
> >
> > [[10]]
> > [1] 5 3 1 4 2 6
> >
> > [[11]]
> > [1] 5 6 3 1 2 4
> >
> > [[12]]
> > [1] 5 3 6 1 2 4
> >
> > [[13]]
> > [1] 5 3 1 6 2 4
> >
> > [[14]]
> > [1] 5 3 1 2 6 4
> >
> > [[15]]
> > [1] 5 3 1 2 4 6
> >
> >
> > This example is just for those with k=2.  How would I
> > calculate those for
> > any k?
> >
> > Thanks in advance for your help.
> >
> > Pauline
> >
> > -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.
> > -.-.-.-.-.-.-.-.-
> > r-help mailing list -- Read
> > http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
> > Send "info", "help", or "[un]subscribe"
> > (in the "body", not the subject !)  To:
> > r-help-request at stat.math.ethz.ch
> > _._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._.
> > _._._._._._._._._
> >
>
>
>LEGAL NOTICE
>Unless expressly stated otherwise, this message is confidential and may be 
>privileged. It is intended for the addressee(s) only. Access to this 
>E-mail by anyone else is unauthorized. If you are not an addressee, any 
>disclosure or copying of the contents of this E-mail or any action taken 
>(or not taken) in reliance on it is unauthorized and may be unlawful. If 
>you are not an addressee, please inform the sender immediately.

-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-help-request at stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._