Nothing
## ----setup, include=FALSE------------------------------------------------
knitr::opts_chunk$set(echo = TRUE)
## ----example, eval=FALSE-------------------------------------------------
# ## Basic example using the default cutoff
# slide(infected = I_sig, uninfected = UN_sig)
#
# ## Using bootstrap to determine cutoff, then running SLIDE
# cutoff <- bootstrap_cutoff(uninfected = UN_sig, fraction = (nrow(I_sig)/nrow(UN_sig)), iter = 40)
# slide(infected = I_sig, uninfected = UN_sig, cutoff = cutoff)
#
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.