R/cluster-functions.R
In mrc-ide/eppasm: Age-structured EPP Model for HIV Epidemic Estimates
Defines functions
get_nunique
get_logmargpost
get_imisiter
pick_maxlpd
pick_maxlpd <- function(set){set <- set[!sapply(set, is.null)]; set[[which.max(sapply(set, function(x) utils::tail(x$stat,1)[1]))]]}
get_imisiter <- function(x) nrow(x$stat)
get_logmargpost <- function(x) utils::tail(x$stat, 1)[1]
get_nunique <- function(x) utils::tail(x$stat, 1)[2]
mrc-ide/eppasm documentation built on March 25, 2024, 9:19 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions get_nunique get_logmargpost get_imisiter pick_maxlpd
pick_maxlpd <- function(set){set <- set[!sapply(set, is.null)]; set[[which.max(sapply(set, function(x) utils::tail(x$stat,1)[1]))]]}
get_imisiter <- function(x) nrow(x$stat)
get_logmargpost <- function(x) utils::tail(x$stat, 1)[1]
get_nunique <- function(x) utils::tail(x$stat, 1)[2]
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.