Nothing
## ----setup, include = FALSE----------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
library(stapler)
## ----sim_data, include=FALSE---------------------------------------------
images = staple_example_data()
## ----data----------------------------------------------------------------
library(stapler)
images = staple_example_data()
res = staple(x = images, set_orient = TRUE)
print(names(res))
## ------------------------------------------------------------------------
x = matrix(rbinom(5000, size = 5, prob = 0.5), ncol = 1000)
table(x)
res_mult = staple_multi_mat(x)
ncol(res_mult$probability)
colnames(res_mult$probability)
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.