выберите разделитель для авто имен столбцов в dplyr - PullRequest
Новая
       7

выберите разделитель для авто имен столбцов в dplyr

0 голосов
/ 24 мая 2018

Как выбрать другое значение, отличное от подчеркивания, когда я использую функцию summarise_if и передаю список функций?Я хочу, чтобы имена моих столбцов содержали только точки, а не подчеркивания, чтобы следовать Руководству по стилю Google для R.

Это то, что я использую для создания столбцов: 

wthmon %<>% summarise_if(is.numeric, funs(min, max, mean, median), na.rm = TRUE)

Конец моих столбцоввыглядит так: 

> names(wthmon)
[1] "exp"               "stat.id"           "year"              "month"            
[5] "temp_min"          "dew_min"           "humid_min"         
"solar_min"        
[9] "rain_min"          "wind.spd_min"      "wind.dir_min"      
"wind.gust_min"    
[13] "soil.temp_min"     "soil.moist_min"    "temp_max"          "dew_max"

Но я бы предпочел temp.min или ground.moist.min, чтобы соответствовать моему стилю.

1 Ответ

0 голосов
/ 29 мая 2018

Использование rename_all и gsub: 

iris %>%
  summarise_if(is.numeric, funs(min, max, mean, median), na.rm = TRUE) %>%
  rename_all(. %>% gsub("_", ".", .)) %>%
  colnames()

Вывод: 

 [1] "Sepal.Length.min"    "Sepal.Width.min"     "Petal.Length.min"    "Petal.Width.min"    
 [5] "Sepal.Length.max"    "Sepal.Width.max"     "Petal.Length.max"    "Petal.Width.max"    
 [9] "Sepal.Length.mean"   "Sepal.Width.mean"    "Petal.Length.mean"   "Petal.Width.mean"   
[13] "Sepal.Length.median" "Sepal.Width.median"  "Petal.Length.median" "Petal.Width.median"
...