Besides the much more compact and probably more efficient approach of
using permutation, here is another method:
expand.grid(rep(list(c(1:3)), 3))[
lapply(
apply(
expand.grid(rep(list(c(1:3)), 3)), 1, unique),
length) ==3 , ]
On Nov 13, 2009, at 4:02 AM, RON70 wrote:
Please consider the following :
expand.grid(rep(list(c(1:3)), 3))
Var1 Var2 Var3
1 1 1 1
2 2 1 1
3 3 1 1
4 1 2 1
5 2 2 1
6 3 2 1
7 1 3 1
8 2 3 1
9 3 3 1
10 1 1 2
11 2 1 2
12 3 1 2
13 1 2 2
14 2 2 2
15 3 2 2
16 1 3 2
17 2 3 2
18 3 3 2
19 1 1 3
20 2 1 3
21 3 1 3
22 1 2 3
23 2 2 3
24 3 2 3
25 1 3 3
26 2 3 3
27 3 3 3
Now I want to remove the rows which has any repetition of number. For
example I want to remove row 1-5 but not 6 and so on........
Is there any easy way to do that?
Thanks,
--
View this message in context:
http://old.nabble.com/All-combination-tp26333348p26333348.html
Sent from the R help mailing list archive at Nabble.com.
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
David Winsemius, MD
Heritage Laboratories
West Hartford, CT
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
