我是 R 的新手,所以请原谅任何看起来过于明显的内容。
我正在使用 apriori 来评估频繁项集。当我执行下面的代码并且我的子集调用返回项目时,一切都运行良好。问题是子集没有返回任何内容(标准不返回子集)。当它执行此操作时,我在尝试构建输出数据帧时收到“未找到对象'rulesMatchLHS'”。您能告诉我在检查 ifelse 行上的rulesMatchLHS 的有效性时我做错了什么吗?
rules <- apriori(trnew, parameter=list(supp=0.01, conf=0.5, minlen=2, maxlen=2))
rulesMatchLHS <- subset(rules, lhs %ain% dataset1)
ifelse(exists(rulesMatchLHS),
OutputClient <- data.frame(lhs=labels(lhs(rulesMatchLHS))$elements, rhs=labels(rhs(rulesMatchLHS))$elements,rulesMatchLHS@quality),
OutputClient <- data.frame())
View(OutputClient)
最佳答案
子集返回一个空数据框。所以它确实存在。还存在要求参数是字符串。您可能希望将 ifelse 中的exists 更改为nrow。这是一个简单的例子来演示:
test <- subset(iris, Species == "Fake")
typeof(test)
exists("test")
nrow(test) == 0
关于r - 检查R中是否存在对象,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/43172790/