Fits a Weibull calibration model for time-to-exposure from interval-censored data. The exposure is a binary covariate measured in intermittent times.
FitCalibWeibull(w, w.res)
Arguments
w: A matrix of time points when measurements on the binary covariate were obtained.
w.res: A matrix of measurement results of the binary covariate. It corresponds to the time points in w
Returns
A bivariate vector: the estimated Weibull shape and scale parameters
Examples
# Simulate data setsim.data <- ICcalib:::SimCoxIntervalCensSingle(n.sample =200, lambda =0.1, alpha =0.25, beta0 = log(0.5), mu =0.2, n.points =2, weib.shape =1, weib.scale =2)# Fit a Weibull calibration model for the covariate starting time distributionICcalib::FitCalibWeibull(w = sim.data$w, w.res = sim.data$w.res)