將字母添加到變量名的末尾

我有一個數據框包含這些變量名稱："X_1","X_106","X_110","X_111","X_112"以及其他以字母表中其他字母開頭的名稱。我有興趣將"_v1"僅附加到以"X"開頭的變量，如上所示。我如何在R中完成這項工作？將字母添加到變量名的末尾

來源

2015-10-15 Ken Stats

names(df2) <- ifelse(grepl("^X",names(df2)), paste0(names(df2),"_v1"), names(df2))

來源

2015-10-15 16:45:05

或'g < - grepl（「^ X」，names（df2））;名稱（df2）[g] < - paste0（名稱（df2）[g]，「_ v1」）'放棄'ifelse（）'呼叫 –

嘆息...再次用快速槍擊... – brittenb

@RichardScriven嘿，爲什麼不'library（data.table）; setDT（list（names（dat）））[grep（「^ X」，V1），V1：= paste0（V1，「_ v1」）]'？ – Frank

或者只是：

colnames(dat) <- sub("(^X.*)", "\\1_v1", colnames(dat))

例如：

dat <- data.frame(a=1, b=2, c=3, 
        X_1=4, X_106=5, X_110=6, X_111=7, X_112=8) 

dplyr::glimpse(dat) 
## Observations: 1 
## Variables: 8 
## $ a  (dbl) 1 
## $ b  (dbl) 2 
## $ c  (dbl) 3 
## $ X_1 (dbl) 4 
## $ X_106 (dbl) 5 
## $ X_110 (dbl) 6 
## $ X_111 (dbl) 7 
## $ X_112 (dbl) 8 

colnames(dat) <- sub("(^X.*)", "\\1_v1", colnames(dat)) 

dplyr::glimpse(dat) 
## Observations: 1 
## Variables: 8 
## $ a  (dbl) 1 
## $ b  (dbl) 2 
## $ c  (dbl) 3 
## $ X_1_v1 (dbl) 4 
## $ X_106_v1 (dbl) 5 
## $ X_110_v1 (dbl) 6 
## $ X_111_v1 (dbl) 7 
## $ X_112_v1 (dbl) 8

來源

2015-10-15 16:45:24 hrbrmstr

你可以只做'str（dat）'而不是加載一個包並打字太多，只是說。很好的解決方案 –

我真的更喜歡'str'上的'glimpse'輸出' – hrbrmstr

'它們只有'num'和'（dbl）'有區別，還是我錯過了某些東西？ –

我相信，因爲這將是簡單的：

library(stringr) 
names(my_data) <- ifelse(str_detect(names(my_data), "^X_"), paste(names(my_data), "v1", sep = "_"), names(my_data))

的str_detect(names(my_data), "^X_")是什麼樣子的名字是從X_開始。

來源

2015-10-15 16:50:24 brittenb

將字母添加到變量名的末尾

回答

相關問題