Nothing
define_cov_bins <- function(coverage_binning,min.coverage=0,max.coverage=5000){
covbin = seq(min.coverage,max.coverage,by = coverage_binning)
covbin[length(covbin)] <- Inf
lev = levels(cut(1,breaks=covbin,include.lowest=TRUE))
return(list(covbin,lev))
}
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.