# Example dataset
data <- data.frame(tmin.l1 = rnorm(10), pdsi.l1 = rnorm(10), urban = rnorm(10))
# Extract names
covs <- extract_names(data, pattern = c("tmin", "pdsi", "urban"))
# Create combinations
combos <- cov_multi(covariates = covs, pattern = c("tmin", "pdsi"))
# Add interaction terms
cov_interact(covariates = combos, pattern = c("tmin", "pdsi"))
# Output can be passed to write_inla_formulas()
new_covs <- cov_interact(combos, pattern = c("tmin", "pdsi"))
formulas <- write_inla_formulas(outcome = "cases", covariates = new_covs)
Run the code above in your browser using DataLab