Description Usage Arguments Details Value Examples
Print Method for Counterfactual Mean of Stochastic Shift Intervention
1 2 |
x |
An object of class |
... |
Other options (not currently used). |
ci_level |
A |
The print
method for objects of class txshift
.
None. Called for the side effect of printing an informative summary
of slots of objects of class txshift
.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | if (require("sl3")) {
set.seed(429153)
n_obs <- 100
W <- replicate(2, rbinom(n_obs, 1, 0.5))
A <- rnorm(n_obs, mean = 2 * W, sd = 1)
Y <- rbinom(n_obs, 1, plogis(A + W + rnorm(n_obs, mean = 0, sd = 1)))
txout <- txshift(
W = W, A = A, Y = Y, delta = 0.5,
estimator = "tmle",
g_exp_fit_args = list(
fit_type = "sl",
sl_learners_density = Lrnr_density_hse$new(Lrnr_glm$new())
),
Q_fit_args = list(
fit_type = "glm",
glm_formula = "Y ~ ."
)
)
print(txout)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.