# \donttest{
if (requireNamespace("arules", quietly = TRUE)) {
data("Groceries", package = "arules")
# Basic apriori
rules <- tidy_apriori(Groceries, support = 0.001, confidence = 0.5)
# Access rules
rules$rules_tbl
}
# }
Run the code above in your browser using DataLab