This function builds a fuzzy spatial inference (FSI) model without elements of the data source component (i.e., spatial plateau objects, fuzzy rules set, and fuzzy sets).
fsi_create(name, and_method = "min", or_method = "max",
imp_method = "min", agg_method = "max",
defuzz_method = "centroid", default_conseq = NULL)An empty named FSI model that is ready to be populated with fuzzy rules representing the antecedents and the consequent.
A character value that specifies the name of the FSI model.
A character value that defines the operator name for the logical connective AND. Default value is "min".
A character value that defines the operator for the logical connective OR. Default value is "max".
A character value that defines the operator for the implication operator. Default value is "min".
A character value that defines the operator for the aggregation operator. Default value is "max".
A character value that determines the defuzzification technique. Default value is the centroid technique.
This parameter is a membership function generated by the function genmf of the FuzzyR package.
The FSI model created with the function fsi_create and its default parameter values will implement a model using Mamdani's method.
The possible values for the parameters and_method and imp_method are: "min", "prod". Other t-norms from the FuzzyR package are also conceivable.
The possible value for the parameters or_method and agg_method is: "max". Other t-conorms from the FuzzyR package are also conceivable.
The possible values for the parameter defuzz_method include other defuzzification techniques from the FuzzyR package.
The parameter default_conseq defines the default behavior of the FSI model when there is no fuzzy rule with a degree of fulfillment greater than 0 returned by the FSI model.
After creating an empty FSI model, you have to call the functions fsi_add_fsa, fsi_add_cs, and fsi_add_rules to fulfill the FSI model.
library(FuzzyR)
# Creating the FSI model
fsi <- fsi_create("To visit or not to visit, that is the question",
default_conseq = genmf("trimf", c(10, 30, 60)))
Run the code above in your browser using DataLab