# NOT RUN {
#create snthetic data
m=matrix(nrow=100,ncol=5,data=0)
for(i in 1:ncol(m)){
m[,i] = rbinom(100,1,0.5)
}
colnames(m)=c("Var1" , "Var2" , "Var3" , "var4" , "Var5")
## Now use Stratify
g=stratify(4,5,m)
# }
Run the code above in your browser using DataLab