Extracts individual terms from solution expressions and returns
formatted unique terms.
extract_terms(solutions, var_names, use_tilde = TRUE)
Arguments
- solutions
Character vector. Solution expressions.
- var_names
Character vector. Variable names used in the analysis.
- use_tilde
Logical. If TRUE, negation is represented as ~VAR.
Value
List with:
all_terms — all terms (with duplicates)
unique_terms — unique terms
n_total — total term count
n_unique — unique term count
Examples
var_names <- c("X1", "X2", "X3")
solutions <- c("X1*X2 + X3", "X1*X2 + X1*X3")
extract_terms(solutions, var_names)
#> $all_terms
#> [1] "X1*X2" "X3" "X1*X2" "X1*X3"
#>
#> $unique_terms
#> [1] "X1*X2" "X3" "X1*X3"
#>
#> $n_total
#> [1] 4
#>
#> $n_unique
#> [1] 3
#>