Nothing
## ----student-plot-usage, eval=FALSE-------------------------------------------
# fit <- cifcurve(
# Event(t, epsilon) ~ fruitq1, data = diabetes.complications,
# outcome.type = "competing-risk", error = "if", conf.dist = "t",
# df.method = "equal", conf.type = "log-log"
# )
# cifplot(fit, outcome.type = "competing-risk", add.risktable = FALSE)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.