String 数据帧中的R变量字符串替换

我有一个如下所示的数据框：

df <- data.frame(one=c("s1_below_10", "s2_below_20"), 
                 two=c("s3_above_10","s4_above_10"))

---

我想知道如何执行此替换（数据集非常大）。感谢您的帮助。

基本的

gsub

呼叫如下：

gsub("^.+?(\\d+)_.+","\\1",df$one)
[1] "1" "2"

您可以将其

lappy

应用于每列：

data.frame(lapply(df, gsub, pattern="^.+(\\d+)_.+",replacement= "\\1"))
  one two
1   1   3
2   2   4

---

如果所需的值始终是字符串的第二个字符（在所有示例中都是如此），则可以使用

substr

：

data.frame(lapply(df, substr, 2, 2))

输出：

  one two
1   1   3
2   2   4

---

上面的模式将只获取多位数的最后一位（可能是想要的，也可能不是），因为第一个“+”是贪婪的，并且将尽可能匹配。将“+”更改为“+？”的简单更正将使其不贪婪，并使\\d+匹配多个数字。

  one two
1   1   3
2   2   4