我在使用R aruleViz软件包的paracoord绘图时遇到了一些问题。
使用R 3.4.4,并且代码是我工作的一部分,很抱歉,我无法提供任何数据。 总结一下,我所做的就是我在规则中添加了“确定性”和“余弦”,并使用以下代码消除了重复项。
然后我创建了最后10条规则,确定性超过0.5,并按余弦排序。
#create rules with apriori#
basket_rules <- apriori(trans_single,parameter = list(support = 0.0001 ,
confidence = 0.0001, minlen = 2, maxlen = 4 ,target="rules"));
#add certainty and cosine columns#
quality(basket_rules)<-cbind(quality(basket_rules),certainty=interestMeasure(basket_rules,measure="certainty",transactions=trans_single))
quality(basket_rules)<-cbind(quality(basket_rules),cosine=interestMeasure(basket_rules,measure="cosine",transactions=trans_single))
#get rid of duplicates#
gi <- generatingItemsets(basket_rules)
d <- which(duplicated(gi))
basket_rules = basket_rules[-d]
#generate final 10 rules#
subrules <- basket_rules[quality(basket_rules)$certainty > 0.5]
subrules2 <- head(subrules, n = 10, by = "cosine")
我期望这是一个很好的paracoord图,但是
> plot(subrules2, method = "paracoord", measure = "cosine", shading = "certainty")
Error in valid.charjust(just) : invalid horizontal justification
> plot(subrules2, method = "matrix", measure = "cosine", shading = "certainty")
Error in valid.charjust(just) : invalid horizontal justification
> plot(subrules2, method = "paracoord")
Error in valid.charjust(just) : invalid horizontal justification
> plot(subrules2, method = "matrix")
Error in valid.charjust(just) : invalid horizontal justification
有人可以帮我吗?我的客户不太了解“图”方法生成的图,并试图向他们展示其他可视化效果以说服他们。
+它看起来像是与ggplot有关的库问题,当我几天前只加载data.table,arules和arulesViz时,它起作用了。但是不能再工作了...
谢谢!