stringrPour manipuler les caractères:
library(stringr)
str_length(x) # nombre de caractères
str_trim(x) # enlever les blancs droite/gauche
str_to_lower(x) # caratère en minuscule
str_to_upper(x) # caratère en majuscule
str_sub(x, start, end) #le debut et la fin
str_detect(x, pattern) # détecter des expressions (lettres/mots/chiffres)
str_replace(x, pattern, replacement) # remplacer le premier élément correspondant au pattern dans l'expression
str_replace_all(x, pattern, replacement) # remplacer tous les éléments correspondant au pattern dans l'expression
str_remove(x, pattern) # supprimer le premier élément correspondant au pattern dans l'expression
str_remove_all(x, pattern, replacement) # supprimer tous les éléments correspondant au pattern dans l'expression library(stringr)
# Utiliser \' peut être une alternative pour l'apostrophe
x <- c('Bonjour le STATEC', 'Formation-R', 'Les statistiques pour tous',
'Or le taux d\'inflation augmente',
'ou sont les statisticiens?', "il n'y a rien de fou")
pattern <- 'ou'
str_detect(x, pattern) # détecter des expressions (lettres/mots/chiffres)## [1] TRUE FALSE TRUE FALSE TRUE TRUE
Choix du pattern
'ou' : la séquence ou'^ou' : commence par ou'ou$' : termine par ou'^o.*u' : séquence qui comprend un o et un u
'[abc]' : détecte a, b, or c'[a-z]' : détecte tous les charactères entre a et z'[^abc]': détecte tous les charactères sauf a, b, ou c'[\^\-]': détecte ^ or -
'[:punct:]' : ponctuations'[:alpha:]' : lettres'[:lower:]' : lettres minuscules'[:upper:]' : lettres majuscules'[:digit:]' : chiffres'[:alnum:]' : chiffres et lettres'[:space:]' : espaces'[:blank:]' : espaces et tabulations{stringr} accidents2019.csv , par des . IMDB.csv \< br /\> "\'s" par " is" "\'ll" par " will" library(lubridate)
# bien lire une date quelque soit le format
ymd(c('2002-03-04','2002/3/4','20020304')) #year month day
ydm(c('2002-04-03','2002/4/3','20020403')) #year day month
dmy(c('04-03-2002','04/3/2002','04032002')) #year day month
# pluriel pour calculer
ymd('2002-03-04')+ days(4)
ymd('2002-03-04')+ weeks(4)
ymd('2002-03-04')+ months(4)
ymd('2002-03-04')+ years(4)
# singulier pour extraire
day('2002-03-04')
wday('2002-03-04', label=TRUE, week_start = 1)
week('2002-03-04')
month('2002-03-04', label=TRUE, abbr = FALSE)
# extraire un trimestre/semestre
quarter('2002-03-04')
semester('2002-03-04', with_year = TRUE)t_billboardn_week représentant le numero de semainen_week soit numérique as.numeric()date.d correpondant à la date de la semaine (utiliser +days() ou +weeks())