5

Matlab ファジー ロジック ツールボックスは、ファジー推論システム モデリングを提供します。. すべてのツールボックスまたは次のようないくつかの R 関数に相当する R はありますか。

  1. readfis() :ファジー推論システムをファイルからロード
  2. evalfis () : ファジー推論計算を実行します

R内のファジーシステムを読んで評価するには?

4

2 に答える 2

15

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)

ここに画像の説明を入力

于 2013-03-04T10:24:03.900 に答える
1

FuzzyToolkitUoN パッケージを使用できます。ノッティンガム大学の JM ガリバルディらによって開発されたと思います。

ソース コードは、彼の Web サイト ( http://ima.ac.uk/garibaldi ) で入手できます。

そして作品はこちらに掲載されました。

于 2013-08-28T21:46:06.517 に答える