Many thanks Jeff and Linus, Yes to Jeff,
OK with Linus but.... classroom <- rep(c("C1","C2","C3","C4","C5","C6"), 50) [sample(1:300)] how can I include the nested structure, I mean the teacher. Now, I would like the 50 pupils belonging to C1 with T1, the 50 pupils belonging to C2 with T2, the 50 pupils belonging to C3 with T3 and so on. Le samedi 18 mai 2019 à 16:20:33 UTC+2, Linus Chen <linus.l.c...@gmail.com> a écrit : Dear varin sacha, Not very sure what you want, but will the following help a little? tmp <- rep(c("C1","C2","C3","C4","C5","C6"), 50) # make a character vector, with 50 "C1", 50 "C2", ... classroom <- tmp[sample(1:300)] # make a random permutation. Certainly you may also make it into one line: classroom <- rep(c("C1","C2","C3","C4","C5","C6"), 50) [sample(1:30)] Best, Lei Chen On Sat, May 18, 2019 at 3:57 PM varin sacha via R-help <r-help@r-project.org> wrote: > > Dear R-Experts, > > In a data simulation, I would like a balanced distribution with a nested > structure for classroom and teacher (not for school). I mean 50 pupils > belonging to C1, 50 other pupils belonging to C2, 50 other pupils belonging > to C3 and so on. Then I want the 50 pupils belonging to C1 with T1, the 50 > pupils belonging to C2 with T2, the 50 pupils belonging to C3 with T3 and so > on. The school don’t have to be nested, I just want a balanced distribution, > I mean 60 pupils in S1, 60 other pupils in S2 and so on. > Here below the reproducible example. > Many thanks for your help. > > ############## > set.seed(123) > # Génération aléatoire des colonnes > pupils<-1:300 > classroom<-sample(c("C1","C2","C3","C4","C5","C6"),300,replace=T) > teacher<-sample(c("T1","T2","T3","T4","T5","T6"),300,replace=T) > school<-sample(c("S1","S2","S3","S4","S5"),300,replace=T) > ############## > > ______________________________________________ > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > 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. ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.