ASSISTDesignB | R Documentation |
ASSISTDesignB
objects are used to design a trial
with certain characteristics provided in the object instantiation
method. This design differs from ASSISTDesign
in only how it
computes the critical boundaries, how it performs the interim
look, and what quantities are computed in a trial run.
ASSISTant::ASSISTDesign
-> ASSISTDesignB
computeCriticalValues()
Compute the critical boundary value c_α
ASSISTDesignB$computeCriticalValues()
a named vector of a single value containing the value for c
explore()
Explore the design using the specified number of simulations, random number seed, and further parameters.
ASSISTDesignB$explore( numberOfSimulations = 100, rngSeed = 12345, trueParameters = self$getDesignParameters(), showProgress = TRUE, saveRawData = FALSE )
numberOfSimulations
default number of simulations is 100
rngSeed
default seed is 12345
trueParameters
the state of nature, by default the value of self$getDesignParameters()
as would be the case for a Type I error calculation. If changed, would yield power.
showProgress
a boolean flag to show progress, default TRUE
saveRawData
a flag (default FALSE
) to indicate if raw data has to be saved
a list of results
analyze()
Analyze the exploration data from trial
ASSISTDesignB$analyze(trialExploration)
trialExploration
the result of a call to explore()
to simulate the design
Return a list of summary quantities
summary()
Print the operating characteristics of the design using the analysis data
ASSISTDesignB$summary(analysis)
analysis
the analysis result from the analyze()
call
clone()
The objects of this class are cloneable with this method.
ASSISTDesignB$clone(deep = FALSE)
deep
Whether to make a deep clone.
ASSISTDesign
which is a superclass of this object
## Not run: data(LLL.SETTINGS) prevalence <- LLL.SETTINGS$prevalences$table1 scenario <- LLL.SETTINGS$scenarios$S0 designParameters <- list(prevalence = prevalence, mean = scenario$mean, sd = scenario$sd) designB <- ASSISTDesignB$new(trialParameters = LLL.SETTINGS$trialParameters, designParameters = designParameters) print(designB) ## A realistic design uses 5000 simulations or more! result <- designB$explore(showProgress = interactive()) analysis <- designB$analyze(result) designB$summary(analysis) ## End(Not run) ## For full examples, try: ## browseURL(system.file("full_doc/ASSISTant.html", package="ASSISTant"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.