当两个值匹配时替换第三个值

编程问答 2022-06-09

问题描述

我用以下代码完成了规则（将其更改为数据框）：

library(arules)
> head(df,20)
                          rules    support confidence   coverage      lift  count
    1        {24470} => {24460} 0.08161561  0.9952387 0.08200606 12.083820  30100
    2        {24460} => {24470} 0.08161561  0.9909465 0.08236127 12.083820  30100
    3        {10410} => {11340} 0.09195178  0.9404065 0.09777875  8.298412  33912
    4        {10220} => {18710} 0.16487167  0.9458072 0.17431847  2.292984  60805
    5        {18720} => {18710} 0.35805120  0.9450301 0.37887810  2.291100 132050
    6  {19330,24470} => {24460} 0.04467980  0.9969145 0.04481809 12.104167  16478
    7  {19330,24460} => {24470} 0.04467980  0.9872978 0.04525464 12.039327  16478
    8  {10320,24470} => {24460} 0.04305562  0.9966108 0.04320204 12.100479  15879
    9  {10320,24460} => {24470} 0.04305562  0.9944886 0.04329423 12.127014  15879
    10 {10410,19330} => {11340} 0.07210915  0.9409475 0.07663462  8.303185  26594

并且我想用以下代码替换这些代码：

> head(rpl,10)
        # A tibble: 20 x 2
           code  codename      
           <chr> <chr>           
         1 10010 입금            
         2 10011 입금취소        
         3 10020 출금            
         4 10021 출금취소        
         5 10030 입고            
         6 10031 입고취소        
         7 10040 출고            
         8 10041 출고취소        
         9 10050 유상청약입금    
        10 10051 유상청약입금취소

我想将df $ rules代码替换为rpl $ codename，请提供帮助。

解决方法

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

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

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

arulesrrstringstring