format the fuzzy rules as a data frame
fs_rules_to_df(fuzzy_system_desc)a data frame, one row per rule, including the default rule, in columns the input and output variables. The values are the corresponding fuzzy set number.
Other fit_utils:
fit_to_df(),
fs_used_vars_to_df()
model <- fuzzycoco("regression", example_mtcars()$params, seed = 123)
df <- mtcars[c("mpg", "hp", "wt", "qsec")]
fit <- fit(model, qsec ~ ., df, seed = 456, max_generations = 10, progress = FALSE)
print(fs_rules_to_df(fit$fuzzy_system))
#> mpg hp wt qsec
#> rule 1 0 2 0 1
#> default rule 0 0 0 2