View source: R/policy_object_functions.R
get_policy_object | R Documentation |
Extract the fitted policy object.
get_policy_object(object)
object |
Object of class policy_eval. |
Object of class policy_object.
library("polle")
### Single stage:
d1 <- sim_single_stage(5e2, seed=1)
pd1 <- policy_data(d1, action="A", covariates=list("Z", "B", "L"), utility="U")
pd1
# evaluating the policy:
pe1 <- policy_eval(policy_data = pd1,
policy_learn = policy_learn(type = "drql",
control = control_drql(qv_models = q_glm(~.))),
g_models = g_glm(),
q_models = q_glm())
# extracting the policy object:
get_policy_object(pe1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.