谷歌数据分析项目中R语言rename函数报错及批量重命名咨询

问题场景 #

在谷歌数据分析证书顶点项目中，因合并数据集需重命名某数据集列，但多次尝试均报错：

尝试代码1（未用反引号包裹列名） #

Divvy_Trips_2019_Q2 %>%  
  rename(start_time=01 - Rental Details Local Start Time)

报错信息：

Error: unexpected symbol in:

"Divvy_Trips_2019_Q2 %>%

rename(start_time=01 - Rental Details"

同时代码行提示：unexpected token 'Details'、unexpected token 'Start'

尝试代码2（添加反引号但未赋值） #

Divvy_Trips_2019_Q2 %>%   
  rename(start_time=`01 - Rental Details Local Start Time`)

仍出现上述相同报错

尝试代码3（错误使用colnames） #

colnames(Divvy_Trips_2019_Q2$`01 - Rental Details Local Start Time`[2]) <- 'start_time'

报错信息：

Error in colnames<-(*tmp*, value = "start_time") :

attempt to set 'colnames' on an object with less than two dimensions

错误原因分析 #

1. 代码1：含空格、数字开头的列名未用反引号包裹，R无法识别完整列名，触发语法错误。
2. 代码2：dplyr的rename函数默认返回新数据框，不会修改原数据，若未将结果赋值回原对象，相当于未执行重命名；若仍报错，需检查列名拼写是否存在细微误差（如多余空格、符号错误）。
3. 代码3：Divvy_Trips_2019_Q2$01 - Rental Details Local Start Time[2]提取的是该列第2个元素（一维向量/标量），这类对象没有列名，因此无法设置colnames。

正确重命名方法 #

单列重命名 #

方式1：dplyr::rename（推荐）

用反引号包裹原列名，并将结果赋值回原数据框：

Divvy_Trips_2019_Q2 <- Divvy_Trips_2019_Q2 %>%  
  rename(start_time = `01 - Rental Details Local Start Time`)

方式2：base R的colnames

通过列名匹配或索引修改：

# 通过列名匹配定位目标列
target_col_index <- which(colnames(Divvy_Trips_2019_Q2) == "01 - Rental Details Local Start Time")
colnames(Divvy_Trips_2019_Q2)[target_col_index] <- "start_time"

# 或直接使用列索引（假设目标列是第1列）
colnames(Divvy_Trips_2019_Q2)[1] <- "start_time"

批量重命名 #

方法1：标准化列名（统一格式）

用dplyr::rename_with批量修改列名格式（如转小写、替换空格为下划线）：

Divvy_Trips_2019_Q2 <- Divvy_Trips_2019_Q2 %>%
  rename_with(
    ~ gsub(" ", "_", .x) %>% tolower(), # 替换空格为下划线并转小写
    everything() # 对所有列生效
  )

方法2：手动指定多列对应关系

适合自定义重命名规则的场景：

Divvy_Trips_2019_Q2 <- Divvy_Trips_2019_Q2 %>%
  rename(
    start_time = `01 - Rental Details Local Start Time`,
    end_time = `02 - Rental Details Local End Time`,
    bike_id = `03 - Bike ID`
    # 可继续添加更多列的重命名规则
  )

方法3：直接替换列名向量

已知所有新列名时，直接替换列名向量：

# 按原数据框列顺序定义新列名
new_col_names <- c(
  "start_time", 
  "end_time", 
  "bike_id", 
  "user_type"
  # 补充剩余列的新名称
)

colnames(Divvy_Trips_2019_Q2) <- new_col_names

内容的提问来源于stack exchange，提问作者JA2024