Can you build your data top-down?


schools <- paste("s", 1:6, sep="")

classes <- character()
for (school in schools) {
  classes <- c(classes, paste(school, paste("c", 1:5, sep=""), sep = "."))
}

pupils <- character()
for (class in classes) {
  pupils <- c(pupils, paste(class, paste("p", 1:10, sep=""), sep = "."))
}



B.



> On 2019-05-18, at 09:57, 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.

Reply via email to