Nothing
#' @include CaseCohort_Obj.R
.CaseCohort_gr <- function(par, minData, info, ...) {
mo <- .newMethodObj_CaseCohort(info = info, par = par, minData = minData)
return( suppressWarnings(colSums(x = .dloglik_CaseCohort(object = mo, ...))) )
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.