## Not run:
# data(cream_id)
# decat(cream_id, formul = "~product+user", firstvar = 3, graph = FALSE)
#
# ###IdMapConsumer function
# data(cream_signa)
# res.idmap <- IdMapConsumer(craem_id, cream_signa, col.p=2, col.j=1, col.lik=29,
# num.col.var.signa=c(1:12), conf.level=0.90, id.recogn="id_", color = FALSE, simusigni = 500)
#
# ## End(Not run)
Run the code above in your browser using DataLab