# \donttest{
data(lr_scores_eg)
data(metadata_eg)
res <- lr_linear_model_discrete(
lr_scores = lr_scores_eg,
metadata = metadata_eg,
group_variable = "IFN_type",
ident1 = "high",
covariates = c("Age_group", "Sex")
)
head(res)
# }
Run the code above in your browser using DataLab