colnames(humanGTF) <- c("symbol","gene_id") humanGTF$gene_id <- str_split(humanGTF$gene_id,"[.]",simplify = T)[,1] # ICGC的基因名字不包括版本号,这里需要对ENSEMBL进行整理,删除“.”和后面的数字 humanGTF <- unique(humanGTF) %>% dplyr::select(gene_id,symbol) # 去重 humanGTF <...