This function checks if the given object inherits from the class koma_seq,
indicating that it represents a system of equations.
Examples
sys <- system_of_equations("y ~ x", exogenous_variables = "x")
is_system_of_equations(sys)
#> [1] TRUE
This function checks if the given object inherits from the class koma_seq,
indicating that it represents a system of equations.
sys <- system_of_equations("y ~ x", exogenous_variables = "x")
is_system_of_equations(sys)
#> [1] TRUE