删除括号内的数字和逗号（正则表达式）

Question

我想提取这个测试向量中的数字。

我已经试过了：

test <- c("(15, 80)","(100, 60)","(40, 40)","(30, 20)","(10, 60)")
stringr::str_extract(test, "[0-9:0-9:0-9], [0-9:0-9:0-9]")

但是返回相同的输入。我需要这样的输出：

 "15, 80"    "100, 60"    "40, 40"    "30, 20"    "10, 60"

Answer 1

使用

gsub()

的正则表达式替换方法，我们可以尝试：

test <- c("(15, 80)","(100, 60)","(40, 40)","(30, 20)","(10, 60)")
output <- gsub("^\\(|\\)$", "", test)
output

[1] "15, 80"  "100, 60" "40, 40"  "30, 20"  "10, 60"

Answer 2

在这种情况下

trimws

会起作用。

trimws(test, whitespace = "[()]")
#[1] "15, 80"  "100, 60" "40, 40"  "30, 20"  "10, 60" 

Answer 3

你可以试试

trimws

和

chartr

> trimws(chartr("()", "  ", test))
[1] "15, 80"  "100, 60" "40, 40"  "30, 20"  "10, 60"