data_src/T10I4D100K/T10I4D100K.R

library(arules)
T10I4D100k <- read.transactions("T10I4D100K.dat")

dim(T10I4D100k)
summary(T10I4D100k)
inspect(head(T10I4D100k), line = FALSE)

save(T10I4D100k, file="T10I4D100k.rda")


#itemFrequencyPlot(T10I4D100k, topN = 20)
#rules <- apriori(T10I4D100k, parameter = list(supp=0.005))
mhahsler/arules documentation built on June 15, 2025, 9:40 a.m.