Могу ли я удалить пробел из всех имен столбцов с помощью dplyr?

Question

В именах нескольких столбцов CSV есть пробел. Я хотел бы удалить пробел из этих имен столбцов с помощью одной команды dplyr .

Я пробовал:

mpg %>%
  rename("tr ans" = trans, "mo del" = model) %>%
  rename_if(everything(), contains(" "), str_replace_all(" ", ""))

Я бы ожидал получить исходный mpg кадр данных с удаленными пробелами, которые я вставил во вторую строку, но я получаю ошибку:

Error: Empty pattern not supported

Answer 1

Почему бы просто не использовать sub:

names(mpg) <- gsub("\\s+", "", names(mpg))

Answer 2

В качестве @camille можно использовать rename_all

library(tidyverse)

mpg %>%
  rename("tr ans" = trans, "mo del" = model) %>%
  rename_all(~str_replace_all(., "\\s+", ""))

или rename_at с everything()

mpg %>%
  rename("tr ans" = trans, "mo del" = model) %>%
  rename_at(vars(everything()), ~str_replace_all(., "\\s+", ""))