如何去除花括号和''=&燃气轮机&引用；R中关联规则的签名

我想知道如何从apriori生成的关联规则中删除花括号和“=>”符号，以便在csv文件中导出规则。

apriori返回的结构包含规则的组件（lhs、rhs）作为因子。您可以使用

gsub

将它们转换为字符串并删除大括号。由于您没有提供任何数据，我将使用内置的

成人
数据进行说明

library(arules)

data("Adult")
rules <- apriori(Adult, 
    parameter = list(supp = 0.7, conf = 0.9, target = "rules"))

LHS = gsub("[{}]", "", as.character(inspect(rules@lhs)$items))
RHS = gsub("[{}]", "", as.character(inspect(rules@rhs)$items))

LHS
 [1] ""                                    ""  
[3] "race=White"                           "race=White"            
 [5] "race=White"                          "native-country=UnitedStates"                  
 [7] "native-country=United-States"        "capital-gain=None"                             
 [9] "capital-loss=None"                   "race=White,native-country=United-States"       
[11] "race=White,capital-gain=None"        "race=White,native-country=United-States"       
[13] "race=White,capital-loss=None"        "race=White,capital-gain=None"                  
[15] "race=White,capital-loss=None"        "capital-gain=None,native-country=United-States"

RHS
 [1] "capital-gain=None"        "capital-loss=None"            "native-country=United-States"
 [4] "capital-gain=None"        "capital-loss=None"            "capital-gain=None"           
 [7] "capital-loss=None"        "capital-loss=None"            "capital-gain=None"           
[10] "capital-gain=None"        "native-country=United-States" "capital-loss=None"           
[13] "native-country=United-States" "capital-loss=None"        "capital-gain=None"           
[16] "capital-loss=None"        "capital-gain=None" 

库（阿鲁莱斯）
数据（“成人”）
rulesPackage
arules
提供了一个名为
DATAFRAME
的函数，可用于抑制括号并将LHS和RHS放在不同的列中

 DATAFRAME(rules, setStart='', setEnd='', separate = TRUE)

欢迎来到StackOverflow。为了提出更好的问题，请阅读和。请参阅
帮助（“sub”）
。谢谢。我用gsub（）函数替换了它。