Nothing
library(profr)
library(optmatch)
load("setup.rda")
gc()
benchmark.sparse.caliper <- profr(result.sparse.caliper <- match_on(x =
predicted, z = DATA$Z, caliper = 1))
save(file = "distance-sparse-caliper.rda",
benchmark.sparse.caliper,
result.sparse.caliper)
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.