#' @inherit DOptimality
#' @export
CPDOptimality <- function(ssn, glmssn, design.points, prior.parameters, n.draws, extra.arguments){
CPOptimality(ssn, glmssn, design.points, prior.parameters, n.draws, extra.arguments) + DOptimality(ssn, glmssn, design.points, prior.parameters, n.draws, extra.arguments)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.