simul_data_complete(20,6)
dimX <- 6
Astar <- 2
simul_data_complete(dimX,Astar)
dimX <- 6
Astar <- 3
simul_data_complete(dimX,Astar)
dimX <- 6
Astar <- 4
simul_data_complete(dimX,Astar)
rm(list=c("dimX","Astar"))
Run the code above in your browser using DataLab