Есть ли способ использовать arulesViz с выводом ruleInduction из arulesSequences? Или есть способ принудить / преобразовать вывод правил последовательности (правил последовательности классов) в правила класса, чтобы я мог использовать arulesViz?
Цель: мне интересно поиграть с некоторыми вариантами визуализации, рассмотренными в этой статье, в частности, с вариантами «графика» (https://cran.r-project.org/web/packages/arulesViz/vignettes/arulesViz.pdf).
Обычно вы используете arulesViz для "правил", производных от arules, например, так (из виньетки):
rules <- apriori(Groceries, parameter=list(support=0.001, confidence=0.5))
plot(x, method = NULL, measure = "support", shading = "lift",
+ interactive = FALSE, data = NULL, control = NULL, ...)
Но я хочу использовать его на выходе cspade + ruleInduction:
s1 <- cspade(trans, parameter = list(support = 0.001,maxlen=3,maxgap=10), control = list(verbose = TRUE,numpart=1))
summary(s1)
s1_df <- as(s1, "data.frame")
r1 <- ruleInduction(s1, confidence = 0.05, control = list(verbose = TRUE))
r1.subset.rule <- subset(r1, rhs(r1) %in% c("9990") & lift>2 & !lhs(r1) %in% c("300","301","412","4033","4043"))
plot(r1.subset.rule,method="graph",control=list(alpha=1))
Error in as.double(y) :
cannot coerce type 'S4' to vector of type 'double'
Есть ли способ сделать это? В настоящее время я получаю указанную выше ошибку. Обратите внимание: это похоже на этот вопрос: Ошибка в as.double (y): невозможно преобразовать тип S4 в вектор типа double, но предложенное там решение (убедитесь, что у вас загружен arulesViz) не работает / не является проблема.
Спасибо вам за помощь!
Если вы считаете, что это неподходящий вопрос, оставьте мне отзыв / комментарии - я пытался исследовать это в течение многих часов, прежде чем размещать здесь, и я несколько новый пользователь: был бы рад услышать, как это можно улучшить.