R/FHT_parametric_cumulative_hazard.R

Defines functions FHT_parametric_cumulative_hazard

#' @export

FHT_parametric_cumulative_hazard <- function(times, mu, y0) {
  return(-log(pnorm((mu*times + y0)/sqrt(times)) - exp(-2*y0*mu)*pnorm((mu*times - y0))/sqrt(times)))
}
vegarsti/fhtboost documentation built on Dec. 14, 2019, 10:44 p.m.