一个关于利用R实现数据框中字段模糊匹配的问题

HBZ	34	12
HBG1/HBG2	3	2
ALAS2	6	43
DCT	23	1
TDGF1/TDGFP3/TDGF2	44	89

PRX	23	4
IL1B	56	123
HBG2	56	89
PI16	45	75
ACOX1	234	56

如图，在表格1中有的数据有多个名字，而表格2中对应的数据只有一个名字，如表1中的HBG1/HBG2和表2中的HBG2，现在我想将两个表按行名相同的进行合并，然而这种多个名字对一个名字的我实在想不出怎样写代码才能避免数据删失

1. library(dplyr)
   
2. library(tidyr)
   
3. df_1 <- data.frame(name = c("HBZ", "HBG1/HBG2", "ALAS2", "DCT", "TDGF1/TDGFP3/TDGF2"),
   
4.                    value_1 = c(34, 3, 6, 23, 44),
   
5.                    value_2 = c(12, 2, 43, 1, 89))
   
6. df_2 <- data.frame(name = c("PRX", "IL1B", "HBG2", "PI16", "ACOX1"),
   
7.                    numeric_1 = c(23, 56, 56, 45, 234),
   
8.                    numeric_2 = c(4, 123, 89, 75, 56))
   
9. 
   
10. # 主要就是这个函数
    
11. df_1 <- separate_rows(df_1, name)
    
12. 
    
13. df_1 %>%
    
14.   inner_join(df_2)

复制代码

你得自定义一张表，把他们的关系一一对应起来，然后利用dplyr包的left_join函数就可以搞定了。

屋檐滴语 发表于 2020-1-29 12:36
你得自定义一张表，把他们的关系一一对应起来，然后利用dplyr包的left_join函数就可以搞定了。

手动自定义的话工作量太大了 这个表有2万行 像这样重复的有几千个。。。

经济学中的因果推断方法【赵西亮教授独家分享】

sanjie27 发表于 2020-8-21 14:32

谢谢您~