トランザクションとルールの可視化

Rで学ぶマーケットバスケット分析

Christopher Bruffaerts

Statistician

インタラクティブな確認

ルール抽出

rules = apriori(Groceries, 
                parameter = list(
                  supp=.001,
                  conf=.5,
                  minlen=2,
                  target='rules'
                 ))

# データテーブルで確認
inspectDT(rules)

HTML テーブル

DT_groceries

インタラクティブな散布図

arulesViz によるプロット

# ルールを散布図でプロット
plot(rules, method = "scatterplot",
     engine = "html")

method で指定できる他のプロット:

two-key plot
grouped
matrix

散布図など

Groceries_interactive_scatter

インタラクティブなグラフ

engine と method

# ルールをグラフでプロット
plot(rules, method = "graph",
     engine = "html")

graph_groceries

インタラクティブなサブグラフ

抽出したルールの並べ替え

# 信頼度が最も高い上位10件のルール
top10_rules_Groceries = 
    head(sort(rules,by = "confidence"), 10)
inspect(top10_rules_Groceries)

# 上位10件のルールをプロット
plot(top10_rules_Groceries, 
     method = "graph",  engine = "html")

サブグラフ_groceries

Groceries を RuleExplorer で探索

rules = apriori(Groceries, parameter=list(supp=0.001, conf=0.8))
ruleExplorer(rules)

shiny_groceries

映画のルールを可視化しましょう！

Rで学ぶマーケットバスケット分析