# NOT RUN {
#' data(initial_estimates_example)
datan = initial_estimates_example$datan
gamma.I = initial_estimates_example$gamma.I
beta = initial_estimates_example$beta
# calculate the initial gamma for population S=1
gamma.S1.origin = Initial.estimates(datan = datan, gamma.I = gamma.I,
X = c('X1', 'X2', 'X3'), B = c('X4', 'B1', 'B2'),
beta = beta, Btype = c('continuous', 'continuous', 'binary'))
# }
Run the code above in your browser using DataLab