将控制台中的对象输出转换为R中的字符串

Question

考虑以下R程序：

library(arules)
data("iris")
train <- sapply(iris,as.factor)
train <- data.frame(train, check.names=FALSE)
txns <- as(train,"transactions")
rules <- apriori(txns, parameter = list(confidence =0.5, support= 0.01,     minlen= 1, maxlen= 3))
rules

这将返回字符串“479套规则” 如何从此字符串中获取值479？我的想法是用strsplit分割这个字符串并取数组中的第三个值。

问题是rules.toString()出错：

  

错误：找不到函数“rules.toString”

因此strsplit(toString(rules)," ")不起作用。

注意：我不想将规则对象转换为数据帧以节省处理时间。

Answer 1

如帮助rules-class {arules}中所述，功能lenght（?arules::length）

所以你需要

length(rules)