用R语言做关联规则分析时，删除冗余规则时老是报错，请各位大神帮我看下！谢谢！-经管之家官网！

> bzrules0.sorted = sort(bzrules0,by="lift")
> subset.matrix=is.subset(bzrules0.sorted,bzrules0.sorted)
> subset.matrix[lower.tri(subset.matrix,diag = T)] <- NA
Warning message:
In `[<-`(`*tmp*`, as.vector(i), value = NA) :
x[.] <- val: x is “ngTMatrix”, val not in {TRUE, FALSE} is coerced; NA |--> TRUE.
警告不造啥意思。。。
> redundant = colSums(subset.matrix,na.rm = T) >= 1
> bzrules0.pruned = bzrules0.sorted[!redundant] #去掉冗余的规则
> inspect(head(bzrules0.pruned))
Error in slot(x, s) : subscript out of bounds
Enter a frame number, or 0 to exit
1: inspect(head(bzrules0.pruned))
2: head(bzrules0.pruned)
3: head(bzrules0.pruned)
4: .local(x, ...)
5: x[head(o, n = n, ...)]
6: x[head(o, n = n, ...)]
7: slot(x, s)
8: slot(x, s)
Selection: 1
Called from: x[head(o, n = n, ...)]
Browse[1]>

扫码或添加微信号：坛友素质互助

「经管之家」APP：经管人学习、答疑、交友，就上经管之家！
免流量费下载资料----在经管之家app可以下载论坛上的所有资源，并且不额外收取下载高峰期的论坛币。
涵盖所有经管领域的优秀内容----覆盖经济、管理、金融投资、计量统计、数据分析、国贸、财会等专业的学习宝库，各类资料应有尽有。
来自五湖四海的经管达人----已经有上千万的经管人来到这里，你可以找到任何学科方向、有共同话题的朋友。
经管之家（原人大经济论坛），跨越高校的围墙，带你走进经管知识的新世界。
扫描下方二维码下载并注册APP