Change LC_TIME permanently when using R

Question

I met a problem today when I was converting month in number to character string labels, for example:

library(lubridate)
month(1,label = T)

An