字符串拆分
原始数据
第二列只想保留第一个
解决方法（感谢我师妹）
CCLE_data <- data.table::fread("CCLE_RNAseq_rsem_genes_tpm_20180929.txt.gz",data.table =F )
transcript_id <- CCLE_data$transcript_ids
library(tidyverse)
transcript_id <- strsplit(transcript_id, split=',', fixed = TRUE, perl = FALSE, useBytes = FALSE)
transcript_id <- sapply(transcript_id,"[",1)
CCLE_data$transcript_ids <- transcript_id
感谢花花老师和群里的小伙伴
还有substring、separate
