How to use rename() and rename_with() under the same dataset in R?

user_17730718 0
Viewed 80
A data.frame: 6 Ɨ 3
Id  ActivityDay Calories
<dbl>   <chr>   <int>
1   1503960366  4/12/2016   1985
2   1503960366  4/13/2016   1797
3   1503960366  4/14/2016   1776
4   1503960366  4/15/2016   1745
5   1503960366  4/16/2016   1863
6   1503960366  4/17/2016   1728

Above is a head() preview of the dataset, I am trying to convert column name ActivityDay into ActivityDate while converting all the column names into lower cases, following are my codes:

# calories
calories %>%
    rename_with(calories, tolower) %>%
    rename(activitydate=activityday)
Error: Can't rename columns that don't exist.
āœ– Column `ActivityDay` doesn't exist.

Please help point out where I did wrong with the codes, thank you!

dplyr rename dataframe r
2 Answers

You don't need to call calories (your dataframe name) twice:

calories %>% 
  rename_with(tolower) %>% 
  rename(activitydate = activityday)

data

calories <- structure(list(Id = c(1503960366L, 1503960366L, 1503960366L, 
1503960366L, 1503960366L, 1503960366L), ActivityDay = c("4/12/2016", 
"4/13/2016", "4/14/2016", "4/15/2016", "4/16/2016", "4/17/2016"
), Calories = c(1985L, 1797L, 1776L, 1745L, 1863L, 1728L)), class = "data.frame", row.names = c("1", 
"2", "3", "4", "5", "6"))
user_134606020

Here is an alternative approach:

library(dplyr)
library(stringr)

calories %>% 
  rename_with(., ~tolower(str_replace(., "activityday", "activitydate"))))

          id activitydate calories
1 1503960366    4/12/2016     1985
2 1503960366    4/13/2016     1797
3 1503960366    4/14/2016     1776
4 1503960366    4/15/2016     1745
5 1503960366    4/16/2016     1863
6 1503960366    4/17/2016     1728
user_133216470
Related