Fuzzy-Logik-Funktion in R wie in Matlab

Question

Matlab Fuzzy-Logik-Toolbox, präsentiert die Fuzzy Inference System Modeling.. Gibt es eine R-Äquivalent aller Toolbox oder eine R-Funktion wie:

1. readfis(): Laden Fuzzyinferenzsystem aus Datei
2. evalfis(): Führen Sie Fuzzy-Inferenz-Berechnungen

zu lesen und das Fuzzy-System innerhalb von R auswerten?

Answer 1

Werfen Sie einen Blick auf die sets package Es tut all die Dinge, die Sie von einer Fuzzy-Logic-Toolbox erwarten. Es ermöglicht Ihnen, Ihre Fuzzy-Zugehörigkeitsfunktionen zu spezifizieren, Ihre Fuzzy-Regeln einzurichten, Fuzzy-Inferenz zu machen und Defuzzyfiz durchzuführen. Das Beispiel in? Fuzzy_inference zeigt das Restaurantbeispiel des Standard-Fuzzy-Logik-Lehrbuchs. Ich empfehle es sehr.

## set universe 
sets_options("universe", seq(from = 0, to = 25, by = 0.1)) 

## set up fuzzy variables 
variables <- 
set(service = fuzzy_partition(varnames = c(poor = 0, good = 5, excellent = 10), sd = 1.5), 
food = fuzzy_variable(rancid = fuzzy_trapezoid(corners = c(-2, 0, 2, 4)), 
         delicious = fuzzy_trapezoid(corners = c(7, 9, 11, 13))), 
tip = fuzzy_partition(varnames = c(cheap = 5, average = 12.5, generous = 20), 
         FUN = fuzzy_cone, radius = 5) 
) 

## set up rules 
rules <- 
set(
fuzzy_rule(service %is% poor || food %is% rancid, tip %is% cheap), 
fuzzy_rule(service %is% good, tip %is% average), 
fuzzy_rule(service %is% excellent || food %is% delicious, tip %is% generous) 
) 

## combine to a system 
system <- fuzzy_system(variables, rules) 
print(system) 
plot(system) ## plots variables 

## do inference 
fi <- fuzzy_inference(system, list(service = 3, food = 8)) 

## plot resulting fuzzy set 
plot(fi) 

## defuzzify 
gset_defuzzify(fi, "centroid") 

## reset universe 
sets_options("universe", NULL) 

Answer 2

können Sie die FuzzyToolkitUoN Paket verwenden. Ich glaube, dass es von J. M. Garibaldi und anderen an der Universität von Nottingham entwickelt wurde.

Der Quellcode ist auf seiner Website zur Verfügung: http://ima.ac.uk/garibaldi

Und Arbeit here veröffentlicht wurde.