powered by
Calculate Calendar Times for Interim Analysis Looks
calendar_time( k, d2max, htime, hevent, delta, ta, tf, method = c("KM"), event_ind = 1 )
Data frame with columns: Distribution, look, time fraction, events, calendar time
Numeric vector of event fractions for each look (e.g., c(0.5, 1))
maximum number of events in the experimental group calculated from the design function.
Historical survival times
Historical event indicators (0/1)
Hazard ratio (experimental vs. historical)
Accrual time
Follow-up time
"exponential", "log_normal" or "KM" for survival function estimation(Default is KM)
Event indicator value (default = 1)
Tushar Patni, Yimei Li and Jianrong Wu.
doi:10.1002/pst.1756HCTDesign
doi:10.1080/10543406.2019.1684305HCTDesign
time <- c(20, 65, 12, 50, 58, 65, 45, 44) event <- c(1, 0, 0, 0, 1, 1, 1, 1) gg<-calendar_time(k=c(0.5, 1),d2max=46,htime=time,hevent=event,delta=0.7,ta=5,tf=4,method="KM")
Run the code above in your browser using DataLab