data("example_data")
# Get names of omics
colnames_omic_fts <- colnames(example_data)[
grep("feature_",
colnames(example_data))][1:5]
# Run function with continuous exposure as the variable of interest
owas_out <- owas(df = example_data,
var = "exposure1",
omics = colnames_omic_fts,
covars = c("age", "sex"),
var_exposure_or_outcome = "exposure",
family = "gaussian",
conf_int = TRUE)
coef_plot_from_owas(owas_out)
Run the code above in your browser using DataLab