diagnose_strategies: Diagnosis a data strategy

In lilymedina/gbiqqtools: Tools for generalized BIQQ

Description

Diagnosis a data strategy

Usage

diagnose_strategies(reference_model, analysis_model, given, queries,
  estimates_database = NULL, possible_data = NULL, N = 1,
  within = FALSE, vars = NULL, conditions = list(TRUE),
  sims = 1000)

Arguments

reference_model	A causal model as created by make_model
analysis_model	A causal model as created by make_model
given	A data frame with exisitng data
queries	queries

Value

A dataframe

Examples

library(dplyr)
reference_model <- analysis_model <-
   make_model("X->M->Y")  %>%
   set_restrictions(causal_type_restrict = "Y[M=1]<Y[M=0] | M[X=1]<M[X=0] ") %>%
   set_parameter_matrix()

df    <- data.frame(X = c(0,0,0,1,1,1), M = NA, Y = c(0,0,1,0,1,1))
given <- collapse_data(df, reference_model)

reference_model <- gbiqq(reference_model, df)

possible_data <- make_possible_data(model = reference_model,
                                    given = given,
                                    within = TRUE,
                                    condition = "X==1 & Y==1",
                                    N = 1,
                                    vars = "M")

queries <- "Y[X=1]>Y[X=0]"

estimates_database <- make_estimates_database(analysis_model,
                                 given,
                                 possible_data,
                                 queries = queries)

diagnose_strategies(reference_model = reference_model,
                  analysis_model = analysis_model,
                  given = given,
                  queries = queries,
                  estimates_database = estimates_database,
                  possible_data = possible_data,
                  sims = 10)

lilymedina/gbiqqtools documentation built on Nov. 4, 2019, 4:32 p.m.