我所有关联规则的提升值均为1我在做什么不正确？

编程问答 2022-08-13

问题描述

我正在执行关联规则，并且所有支持置信度Coververage和lift的输出均为1。我做错了什么？

数据集：https://github.com/Tesla-Republic/cosmetic/blob/master/Cosmetics.csv 

Cosmetics_df <- read_csv("attached_file")
head(Cosmetics_df)
Cosmetics_df <- Cosmetics_df[,c(-1)]
summary(Cosmetics_df)
Cosmetics_trans <- as(Cosmetics_df,"transactions")
inspect(Cosmetics_trans)
rule1 <- apriori(Cosmetics_trans,parameter = list(supp = 0.2,conf = 0.5,target = "rules"))

inspect(head(sort(rule1,by = "lift",decreasing = T),5))

这是输出：

    lhs    rhs                 support confidence coverage lift count
[1] {}  => {Bag=[0,1]}         1       1          1        1    1000 
[2] {}  => {Blush=[0,1]}       1       1          1        1    1000 
[3] {}  => {Nail Polish=[0,1]} 1       1          1        1    1000 
[4] {}  => {Brushes=[0,1]}     1       1          1        1    1000 
[5] {}  => {Concealer=[0,1]}   1       1          1        1    1000

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

associationsliftrr