powered by
Run simulations to catch random variations. Warning : does not check it formally. Warning : does not check if quantiles are used several times.
check_simulator( simulatorQ, ndraw, Theta_lower = 0, Theta_upper = 1, ntheta = 5, nruns = 3 )
Boolean. True if no random effect was detected, False else.
Function of type simulatorQ(Theta, quantiles) where Theta is the parameter set for the simulations and quantiles are drawn in U(0,1).
Integer. Number of random variables to draw for one simulation of the model.
1D numeric array. Lower bounds of Theta parameters.
1D numeric array. Upper bounds of Theta parameters.
Integer. Number of Theta parameters to test.
Integer. For each Theta, number of simulations to run.
simulatorQ <- function(Theta, quantiles){ qpois(quantiles, lambda = Theta) } check_simulator(simulatorQ, 5, Theta_lower = 50, Theta_upper = 150)
Run the code above in your browser using DataLab