Nothing
## ----ex_setup, include=FALSE------------------------------------------------------------
knitr::opts_chunk$set(
message = FALSE,
digits = 3,
collapse = TRUE,
comment = "#>"
)
options(digits = 3)
## ----mtcars_bt, message=FALSE-----------------------------------------------------------
library(rsample)
set.seed(8584)
bt_resamples <- bootstraps(mtcars, times = 3)
bt_resamples
## ----rsplit-----------------------------------------------------------------------------
first_resample <- bt_resamples$splits[[1]]
first_resample
## ----rsplit_df--------------------------------------------------------------------------
head(as.data.frame(first_resample))
as.data.frame(first_resample, data = "assessment")
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.