Comment changer l’abréviation du jour de la semaine en anglais?

J’ai un problème avec la définition de l’abréviation des jours de la semaine dans les données. Ce dont j’ai besoin, ce sont les abréviations “lundi, mardi, mercredi, jeudi, vendredi, samedi et dimanche”. La fonction lubridate :: wday () avec laquelle je travaille donne les valeurs “lundi, mardi, mercredi, jeudi, vendredi, samedi et dimanche”.

C’est une petite différence pour les jours “mardi” et “jeudi”.

x <- seq(Sys.Date() - 7, Sys.Date(), by = 1) lubridate::wday(x, label = TRUE) ## [1] Thu Fri Sat Sun Mon Tue Wed Thu 

J’ai également changé les parameters de langue avec les parameters régionaux, mais cela n’a pas été le cas car je ne suis pas sûr des parameters possibles à définir (sélections possibles).

 lubridate::wday(x, label = TRUE, locale = "French") ## [1] jeu\\. ven\\. sam\\. dim\\. lun\\. mar\\. mer\\. jeu\\. lubridate::wday(x, label = TRUE, locale = "English") ## [1] Thu Fri Sat Sun Mon Tue Wed Thu lubridate::wday(x, label = TRUE, locale = "English_Great Britain") ## [1] Thu Fri Sat Sun Mon Tue Wed Thu lubridate::wday(x, label = TRUE, locale = "English_United States") ## [1] Thu Fri Sat Sun Mon Tue Wed Thu 

La différence peut provenir d’un changement dans ma version R (maintenant 3.4.2), car il a été mentionné un changement dans cette nouvelle version concernant ce sujet … ( https://cran.r-project.org/bin/windows /base/NEWS.R-3.4.2.html -> La définition de la catégorie LC_ALL dans Sys.setlocale () invalide les noms de jour / mois spécifiques aux parameters en mémoire cache et l’indicateur AM / PM pour strptime () (comme le paramètre LC_TIME a depuis R 3.1.0 )

Système – Information:

 R version 3.4.2 (2017-09-28) Platform: x86_64-w64-mingw32/x64 (64-bit) Running under: Windows >= 8 x64 (build 9200) Masortingx products: default locale: [1] LC_COLLATE=English_United States.1252 LC_CTYPE=English_United States.1252 LC_MONETARY=English_United States.1252 [4] LC_NUMERIC=C LC_TIME=English_United States.1252 attached base packages: [1] stats graphics grDevices utils datasets methods base loaded via a namespace (and not attached): [1] comstackr_3.4.2 imsbasics_1.8.0 magrittr_1.5 tools_3.4.2 simtimer_2.0.18 Rcpp_0.12.12 lubridate_1.7.1 [8] schedule_1.0.0 ssortingngi_1.1.5 ssortingngr_1.2.0 

Comme vous voulez des abréviations non standard, vous devez le faire manuellement:

 x <- seq(Sys.Date() - 7, Sys.Date(), by = 1) Sys.setlocale("LC_TIME", "C") #since I'm at a non-English locale factor(weekdays(x, TRUE), levels = c("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun"), labels = c("Mon", "Tues", "Wed", "Thurs", "Fri", "Sat", "Sun")) #[1] Thurs Fri Sat Sun Mon Tues Wed Thurs #Levels: Mon Tues Wed Thurs Fri Sat Sun 

Je ne sais pas pourquoi vous croyez que cela soit lié aux versions R ...