# NOT RUN {
# not run (make sure to load in SuperLearner if running)
# set.seed(1010)
# fake_dat <- data.frame(y = rbinom(100, size = 1, prob = 0.5),
# delta = rbinom(100, size = 1, prob = 0.5),
# w = matrix(rnorm(500), ncol = 5))
# ic.proj.rr.nolas(fake_dat)
# }
Run the code above in your browser using DataLab