regex - 在字符上拆分字符串向量以返回矩阵

Question

我有

rownames(results.summary)
[1] "2 - 1" "3 - 1" "4 - 1"

我想要的是返回一个矩阵

2  1
3  1
4  1

我的做法是:

for(i in 1:length(rownames(results.summary)){
  current.split <- unlist(strsplit(rownames(results.summary)[i], "-"))
  matrix.results$comparison.group[i] <- trim(current.split[1])
  matrix.results$control.group[i] <- trim(current.split[2])
}

trim 函数基本上删除了两端的所有空格。

我一直在学习正则表达式，想知道是否有更优雅的矢量化解决方案？

Answer 1

无需使用strsplit，只需使用read.table读取即可:

 read.table(text=vec,sep='-',strip.white = TRUE) ## see @flodel comment
  V1 V2
1  2  1
2  3  1
3  4  1

vec 在哪里:

vec <-  c("2 - 1", "3 - 1", "4 - 1")