explosion-size.r

temp

library(rsample)
library(modeldata)
data(wa_churn)

df <- bootstraps(wa_churn, 100)

# Look, recipes is smart! This is cheap
lobstr::obj_size(df)
#> 3,667,368 B

# This is the approximate cost of 100 bootstraps if we weren't being smart
lobstr::obj_size(wa_churn) * 100
#> 76,774,400 B

# Mock sending it off to a PSOCK worker and reading it back in on that worker
tf <- tempfile()
saveRDS(df, tf)
df_read <- readRDS(tf)

# Now we are around that approximate cost, because each of the 100 data frames gets fully copied
lobstr::obj_size(df_read)
#> 79,430,088 B

^{Created on 2021-06-10 by the reprex package (v2.0.0)}