如何将空白的最后一组字符串设为空白

Question

我的数据框如下

col_A              col_A_modified
date/abc/pa         date/abc
date/ab/press       date/ab
date/xyz/temp       date/xyz

在上面的数据框中，如何获得＆＃34; col_A_modified＆＃34;

Answer 1

我们可以使用sub来匹配/后跟零个或多个不是/的字符（[^/]*直到结尾（$）字符串并将其替换为空白（""）

df1$col_A_modified <- sub("\\/[^/]*$", "", df1$col_A)
df1$col_A_modified
#[1] "date/abc" "date/ab"  "date/xyz"