#' cohort
#'
#' Gives a particular aggregation for life.table(). Original function in demoR_0.4.2
#' @param width12
#' @keywords cohort life table
#' @export
#' @examples
#' cohort()
cohort <- function(width12){
return(nax12 <- width12/2)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.