# NOT RUN {
datafile <- system.file("extdata", "sureg_data.csv", package = "packDAMipd")
dataset <- read.csv(datafile, stringsAsFactors = TRUE)
results_sureg <- use_seemingly_unrelated_regression("read", "math",
dataset = dataset,
indep_var = "female", covariates1 = c("as.numeric(ses)", "socst"),
covariates2 = c("as.numeric(ses)", "science"), interaction1 = FALSE,
interaction2 = FALSE
)
# }
Run the code above in your browser using DataLab