字符串拆分

字符串拆分

原始数据

第二列只想保留第一个

解决方法（感谢我师妹）

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