sim_data <- generateData(nsub = 100, nobs = rep(10, 100), p = 200,
beta0 = c(rep(1,7),rep(0,193)), rho = 0.6, correlation = "AR1",
dis = "normal", ka = 1)
Run the code above in your browser using DataLab