Get weekdays in English in R

Question

I am using R outside the US and I got everything working in English, but the result of weekdays() is still in Spanish:

Day <- seq(as.Date("2013-06-01"), by=1, len=30)
weekdays(Day)
[1] "sábado"    "domingo"   "lunes"     "martes"    "miércoles"  (...)

Any ideas on how to get the weekdays in English?

Answer 1

Printing of Date and POSIX*t objects seems to be controlled by the LC_TIME locale category.

On Windows, you change it like this:

## First, save the current value so we can restore it later
Sys.getlocale("LC_TIME")
# [1] "English_United States.1252"

## First in Spanish
Sys.setlocale("LC_TIME","Spanish Modern Sort")
# [1] "Spanish_Spain.1252"
weekdays(Sys.Date()+0:6)
# [1] "lunes"     "martes"    "miércoles" "jueves"    "viernes"   "sábado"   
# [7] "domingo"  

## Then back to (US) English
Sys.setlocale("LC_TIME","English United States")
# [1] "English_United States.1252"
weekdays(Sys.Date()+0:6)
# [1] "Monday"    "Tuesday"   "Wednesday" "Thursday"  "Friday"    "Saturday" 
# [7] "Sunday" 

On most *NIXes, the equivalent would be:

Sys.setlocale("LC_TIME", "en_US")

The particular locale names are OS-dependent, as mentioned in ?Sys.setlocale. For names accepted by Windows, see here. For names accepted by Linux, see here.

Answer 2

From my answer here, you can get weekdays in English without messing with locales like this:

c("Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", 
  "Friday", "Saturday")[as.POSIXlt(Day)$wday + 1]

Answer 3

Sys.setlocale("LC_TIME", "C")

did the trick for me. Also this don't bring us OS reports request to set locale to "EN" cannot be honored error message.

Answer 4

Under windows RStudio

Sys.setlocale("LC_TIME", "English")

That was the only thing that worked for me.

Answer 5

I faced the very same problem trying to change the locale from es_ES to en_US (both UTF-8).

R message is given by R main workspace, as it cannot change system locale. If code is inserted into an R-script a new workspace (the running one) is created, and locale can be overriden.

In my code I included the following lines:

curr_locale <- Sys.getlocale("LC_TIME")
Sys.setlocale("LC_TIME","en_US.UTF-8")

#<specific code for graph generation>

Sys.setlocale("LC_TIME",curr_locale)

That made the change!

Answer 6

How about this:

dev_null <- Sys.setlocale("LC_TIME", "english")

Answer 7

I personally prefer not to modify Sys settings. An alternative solution using the clock package would be:

Date <- seq(as.Date("2013-06-01"), by = 1, len = 30)

# string representation
as.character(clock::date_weekday_factor(Date))

# factor representation
factor(clock::date_weekday_factor(Date, encoding = "iso"), ordered = F)