R语言生存分析数据整理

只能做个大概了，你看看是不是这样？

1. library(tidyverse)
   
2. 
   
3. table_1 <- tribble(
   
4.   ~rn,        ~years_to_birth,        ~vital_status,        ~days_to_death,
   
5.   'tcga.05.4425' , 80, 0, NA,
   
6.   'tcga.05.4426' , 76, 1, 303
   
7. )
   
8. 
   
9. table_2 <- tribble(
   
10.   ~rn, ~PABPC,        ~CDIA,
    
11.   'tcga.05.4425.01' , 0.32, 1.7,
    
12.   'tcga.05.4426.01' , 0.38, 6.3,
    
13.   'tcga.05.4427.01' , 0.68, 7.3
    
14. )
    
15. 
    
16. table_2 <- table_2 %>%
    
17.   separate(rn, into = c("A2", "B2", "C2", "D2"), sep='\\.')
    
18. 
    
19. table_1 <- table_1 %>%
    
20.   separate(rn, into = c("A1", "B1", "C1"), sep='\\.')
    
21. 
    
22. table_3 <- table_2 %>%
    
23.   left_join(table_1, by=c("C2"="C1"))
    
24. 
    
25. table_3

复制代码

drunkfish69 发表于 2020-4-12 10:54
是不是想通过表2中的‘rn’字段去左连接表1？首先确定是不是一对一的？

你好，你有生存分析的报告或者论文吗，想找一篇，有报酬的