Nothing
test_simple_missingness <- function() {
d <- wrapr::build_frame(
"x1", "x2", "x3" |
1 , 4 , "A" |
NA , 5 , "B" |
3 , 6 , NA )
plan <- design_missingness_treatment(d)
prepare(plan, d)
prepare(plan, data.frame(x1=NA, x2=NA, x3="E"))
invisible(NULL)
}
test_simple_missingness()
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.