當列名以特定數字結尾時，重命名數據框列

Question

發現了有關更改數據框中列名稱的幾個問題，但未回答我遇到的問題。

我正在讀取一些excel文件作爲循環中的數據幀，對每個數據幀的數據進行一些分析並移動下一個數據幀。在每個需要重命名名稱以例如00010結尾的列的數據框中，列的位置在每個文件/數據幀中都會改變。

例如進口列名：agency_id，site_no，datetime，tz_cd，11_00010，11_00010_cd，12_00030，12_00030_md ...

對於我的分析，我需要以下欄目：site_no，datetime，11_00010，12_00030。我需要將列重命名爲溫度和列，將12_00030重命名爲salinity。如果它們的順序相同，我可以使用rename中的plyr或colnames或names來輕鬆重命名列。但是，每個數據幀中列的順序或順序不同，包含00010和00030的列可能以不同的數字開頭，因此列名中的00010和00030的位置並不總是固定的。如果是重命名會更容易。另外，我不需要名稱包含00010或00030，但以cd或md結尾的列。

真的很感激任何方法。

Answer 1

爲什麼不只是使用gsub？

假設 「X」 是列名（通常是通過names(your-data-frame)訪問：

x <- c("agency_id", "site_no", "datetime", "tz_cd", "11_00010", 
     "11_00010_cd", "12_00030", "12_00030_md") 

x <- gsub("11_00010", "temperature", x) 
x <- gsub("12_00030", "salinity", x) 
x 
# [1] "agency_id"  "site_no"  "datetime"  "tz_cd"   
# [5] "temperature" "temperature_cd" "salinity"  "salinity_md" 

---

看你的意見，也許你正在尋找的東西更像：

x <- c("agency_id", "site_no", "datetime", "tz_cd", "11_00010", 
     "11_00010_cd", "12_00030", "12_00030_md") 

x[grep("_00010$", x)] <- "temperature" 
x[grep("_00030$", x)] <- "salinity" 
x 
# [1] "agency_id" "site_no"  "datetime" "tz_cd"  
# [5] "temperature" "11_00010_cd" "salinity" "12_00030_md"