# \donttest{
data("apparelTrans")
data("apparelStaticCov")
# Create a clv data object without covariates
clv.data.apparel <- clvdata(apparelTrans, time.unit="w",
date.format="ymd")
# Add static covariate data
clv.data.apparel.cov <-
SetStaticCovariates(clv.data.apparel,
data.cov.life = apparelStaticCov,
names.cov.life = "Gender",
data.cov.trans = apparelStaticCov,
names.cov.trans = "Gender",
name.id = "Id")
# more summary output
summary(clv.data.apparel.cov)
# fit model with static covariates
pnbd(clv.data.apparel.cov)
# }
Run the code above in your browser using DataLab