# NOT RUN {
# Generate the parameter matrix with 20 replications
q <- "qunif"
q.arg <- list(min = 0, max = 1)
set.seed(1234)
x <- rfast99(params = 3, n = 100, replicate = 20, q = q, q.arg = q.arg)
dim(x$a) # the array of c(model evaluation, replication, parameters).
# }
# NOT RUN {
save(x, file = "input_parameters.rda")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab