arules包中的priori调用即使在存储到变量中也会写入输出，如何防止？

Question

我有这样一个基本的例子，在这个例子中，我试图将输出的 apriori 调用到一个变量。然而，我还是得到了控制台的输出。我需要在数千种方案上运行这个，不想让这个输出显示出来。

有什么方法可以避免这种情况吗？

library(arules)
df <- data.frame(basket = c(1, 1, 2, 2, 2), item = c('a', 'b', 'a', 'b', 'c'))
as <- as(split(df[, 'item'], df[, 'basket']), 'transactions')
ar <- apriori(as, list(target = 'frequent itemsets'))