如何用月份的全名替换数字月份

使用 tidyverse 包将月份的列更改为完整的实际月份名称。请记住，尽管这些数据只有四个月，但我的真实数据集包含一年中的所有实际月份。

我是 tidyverse 的新手

mydata <- tibble(camp = c("Platinum 2018-03","Reboarding 2018","New Acct Auto Jul18", "Loan2019-4"),
              Acct = c(1, 33, 6, 43),
              Balance = c(222, 7744, 949, 123),
              Month = c(1,4,6,8))

我期望输出是 一月、四月、六月、八月等。感谢您的帮助。

R 带有一个month.name只要你只需要英文名字，向量应该没问题。

mydata %>% mutate(MonthName = month.name[Month])

giving:

# A tibble: 4 x 5
  camp                 Acct Balance Month MonthName
  <chr>               <dbl>   <dbl> <dbl> <chr>    
1 Platinum 2018-03        1     222     1 January  
2 Reboarding 2018        33    7744     4 April    
3 New Acct Auto Jul18     6     949     6 June     
4 Loan2019-4             43     123     8 August 

其他语言

如果您需要其他语言，请使用此代码（或省略as.character获得有序因子输出）：

library(lubridate)
Sys.setlocale(locale = "French")
mydata %>% mutate(MonthName = as.character(month(Month, label = TRUE, abbr = FALSE)))

giving:

# A tibble: 4 x 5
  camp                 Acct Balance Month MonthName
  <chr>               <dbl>   <dbl> <dbl> <chr>    
1 Platinum 2018-03        1     222     1 janvier  
2 Reboarding 2018        33    7744     4 avril    
3 New Acct Auto Jul18     6     949     6 juin     
4 Loan2019-4             43     123     8 août