删除部分列名

Question

我有一个df 的列名是a.b.c.v1, d.e.f.v1, h.j.k.v1，并且想从df 的所有列名中删除v1。

我想我应该使用gsub，但我的试验没有成功。

Answer 1

我们可以使用sub 删除字符串末尾的.v1。 （如果我们只需要删除'v1'，只需从模式中删除\\. 即可匹配，但我认为列名末尾的. 可能看起来不太好）。在这里，我们匹配点 (\\.) 后跟多个不是点的字符 ([^.]+) 直到字符串结尾 ($) 并将其替换为 ""。

colnames(df) <- sub('\\.[^.]+$', '', colnames(df))
colnames(df)
#[1] "a.b.c" "d.e.f" "h.j.k"