R如何為arules軟件包加載稀疏數據

Question

我有CSV，其文本數據類似於以下內容：

citrus fruit,semi-finished bread,margarine,ready soups
tropical fruit,yogurt,coffee
whole milk
pip fruit,yogurt,cream cheese ,meat spreads
other vegetables,whole milk,condensed milk,long life bakery product
whole milk,butter,yogurt,rice,abrasive cleaner

我想將其加載到稀疏交易表單中，最好的方法是什么？ 我希望能夠在其上使用arules軟件包

Answer 1

您可以使用readLines ，然后使用strsplit ，然后強制使用arules的transactions對象

tran <- readLines("transactions.csv")      # read all lines
tran <- strsplit(tran, ",", fixed=TRUE)    # split each line by commas, returns a list

library(arules)
tran <- as(tran, Class =  "transactions")            # coerce to transaction object
rules <- apriori(tran, parameter=list(support=0.1))   # etc
inspect(rules[1])