我有一张桌子“countdata”
/share/Data01/zhangxi/workspace/Bioinformatics_Data/RNA_seq_program/01_4_DESeq2_analysis/B18-N.sorted.bam /share/Data01/zhangxi/workspace/Bioinformatics_Data/RNA_seq_program/01_4_DESeq2_analysis/B18-CA.sorted.bam
ENSG00000223972 0 0
ENSG00000227232 413 196
ENSG00000243485 0 0
ENSG00000237613 0 0
ENSG00000268020 0 0
ENSG00000240361 0 0
我用R做了。
colnames(countdata) <- gsub("((?:[^/]*/)*)", "", colnames(countdata))
colnames(countdata) <- gsub("\\.[sb]am$", "", colnames(countdata))
#change it into this
B18-CA.sorted B18-N.sorted
ENSG00000223972 0 0
ENSG00000227232 413 196
ENSG00000243485 0 0
ENSG00000237613 0 0
ENSG00000268020 0 0
ENSG00000240361 0 0
如何在一行中更改表格?
colnames(countdata) <- gsub(Regular_Expression, "", colnames(countdata))
答案 0 :(得分:2)
也许你可以试试:
sub("\\.bam", "", basename(colnames(countdata)))
basename
允许检索路径中最后/
之后的内容。