使用带有多个分隔符的 strsplit

Question

我该如何拆分这个

 Chr3:153922357-153944632(-)
 Chr11:70010183-70015411(-)   

进入

    Chr3  153922357 153944632 - 
    Chr11 70010183  70015411  -   

我试过了strsplit(df$V1,"[[:punct:]]"))，但最终结果中没有出现负号

Answer 1

您还可以尝试str_split从stringr：

library(stringr)
lapply(str_split(df$V1, "(?<!\\()\\-|[:\\)\\(]"), function(x) x[x != ""])

结果：

[[1]]
[1] "Chr3"      "153922357" "153944632" "-"        

[[2]]
[1] "Chr11"    "70010183" "70015411" "-"

数据：

df = read.table(text = " Chr3:153922357-153944632(-)
 Chr11:70010183-70015411(-) ")