Matlab ファジー ロジック ツールボックスは、ファジー推論システム モデリングを提供します。. すべてのツールボックスまたは次のようないくつかの R 関数に相当する R はありますか。
R内のファジーシステムを読んで評価するには?
Matlab ファジー ロジック ツールボックスは、ファジー推論システム モデリングを提供します。. すべてのツールボックスまたは次のようないくつかの R 関数に相当する R はありますか。
R内のファジーシステムを読んで評価するには?
sets package
ファジー ロジック ツールボックスに期待するすべてのことを行います。ファジー メンバーシップ関数の指定、ファジー ルールの設定、ファジー推論の実行、非ファジー化を行うことができます。?fuzzy_inference の例は、標準的なファジー論理教科書のレストランの例を示しています。強くお勧めします。
## 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)
FuzzyToolkitUoN パッケージを使用できます。ノッティンガム大学の JM ガリバルディらによって開発されたと思います。
ソース コードは、彼の Web サイト ( http://ima.ac.uk/garibaldi ) で入手できます。
そして作品はこちらに掲載されました。