arules/ as/ 如何将强制方法导入另一个包?

arules/ as/ how to import a coercion method to another package?

我想在我的包中使用包 arules 功能,但不能 由于名称冲突导入整个包。 object@datafr 是一个数据框,需要强制转换为事务。我应该如何处理下面代码中的第二行?

showrules <- function(object, support=0.05, confidence=0.5){
combinations <- as(object@datafr, "transactions")
rules <- arules::apriori(combinations, parameter = list(support = support,          
confidence = confidence), appearance=list(rhs='target=high', default='lhs'))
arules::inspect(rules)
}

我不知道如何使用名称空间限定符调用 as()arules::coerce() 不起作用),但幸运的是 apriori() 也接受 data.frames 并强制它们内部进入交易。所以你可以使用:

rules <- arules::apriori(object@datafr, parameter= list(support = support, confidence = confidence), appearance=list(rhs='target=high', default='lhs'))