从列变量中删除前缀字母 数据

如何解决从列变量中删除前缀字母 数据

我拥有所有以“ m”开头的列名。示例：mIncome,mAge。我要删除prefix。到目前为止，我已经尝试了以下方法：

df %>% 
rename_all(~stringr::str_replace_all(.,"m",""))

这将删除所有带有字母“ m”的列名。我只需要从一开始就将其删除。有什么建议吗？

解决方法

您可以在基数R中使用sub从列名的开头删除“ m”。

names(df) <- sub('^m','',names(df))

,

我们需要指定位置。 ^与字符串的开头（或此处的列名）匹配。因此，如果我们使用^m，它将仅与字符串的开头或开头的'm'相匹配，而与其他位置不匹配。

library(dplyr)
library(stringr)
df %>% 
      rename_all(~stringr::str_replace(.,"^m",""))
#   ba Mbgeg gmba cfor
#1  1     2    4    6
#2  2     3    5    7
#3  3     4    6    8

此外，如果应忽略大小写，请用regex包装并指定ignore_case = TRUE

df %>%
    rename_all(~ stringr::str_replace(.,regex("^m",ignore_case = TRUE),""))
#  ba bgeg gmba cfor
#1  1    2    4    6
#2  2    3    5    7
#3  3    4    6    8

另一个选择是单词边界（\\bm），但这可以匹配具有多个单词列名称的单词开头

注意：当我们要替换多次出现的str_replace_all时，使用pattern。在这里，我们只需要替换第一个实例就可以了，str_replace就足够了。

数据

df <- data.frame(mba = 1:3,Mbgeg = 2:4,gmba = 4:6,cfor = 6:8)

,

另一种尝试的方式

library(tidyverse)
df <- data.frame(mma = 1:2,mbapbe = 1:2)
df2 <- df %>% 
  rename_at(vars(c("mma","mbapbe")),function(x) gsub("^m","",x))
#   ma bapbe
# 1  1     1
# 2  2     2