美文网首页
2020-08-17 学习心得1

2020-08-17 学习心得1

作者: whykm | 来源:发表于2020-08-17 22:51 被阅读0次
library(tidyverse)
AllScoreData=read_tsv("AllScoreData.txt")
AllScoreData <- AllScoreData %>% separate(ID, into = c("ID", "b"),sep = 12) %>% select(-b) 
ClinicalData=read_tsv("ClinicalData.txt")
ClinicalData <- ClinicalData %>% rename(ID = Id)
SameSample <- inner_join(AllScoreData, ClinicalData, by="ID")

相关文章

网友评论

      本文标题:2020-08-17 学习心得1

      本文链接:https://www.haomeiwen.com/subject/huvcjktx.html