だから、私は自分のデータでルールを機能させようとしています.transaction_ID、Item_name、Item_IDがあります。しかし、item_name と transaction_ID に対して apriori 関数を呼び出すと遅すぎますが、item_id と transaction_ID で呼び出すと非常に高速です。では、item_id を使用してルールを作成し、ID を実際の名前に置き換える方法はありますか? 使用するコード例を次に示します。
library(arules)
library(arulesViz)
products <- c(1,1,1,3,4,5,6,4)
transaction_id <- c(2,2,3,3,3,4,4,4)
dataset <- data.frame(products ,transaction_id)
dataset
transaction <- as(split(dataset[,"products"],dataset[,"transaction_id"]), "transactions")
rule <- apriori(transaction, parameter = list(supp = 0.001, conf = 0.8))
inspect(rule)
products_id <- c(1,3,4,5,6)
names <- c("nail","Black Hammer 127","White desk 12","green desk","pink car")
cod <- data.frame(products = products_id, names)