634
Le logiciel R
C- Gestion des chaˆ ınes de caract` eres
3.1- url <- "http://www.biostatisticien.eu/springeR/dept-pop.csv"
dept <- read.csv(url,dec=",")
3.2- numdep <- substring(dept$Departement,1,3)
Dept <- substring(dept$Departement,4)
dept <- cbind(numdep,Dept,dept[,-1])
D- ´
Epid´ emies de grippe en France depuis 1984
3.1- url <- "http://www.biostatisticien.eu/springeR/grippe.csv"
head(read.csv(url))
On constate que les valeurs manquantes sont cod´ ees par des tirets (-).
On utilise donc l’instruction suivante :
grippe <- read.csv(url,na.strings="-")
3.2- names(grippe)
grippe$Date
3.3- unique(sort(substring(grippe$Date,5,6)))
On trouve les num´ eros "01" ` a "53".
3.4- strptime("198444",format="%Y%W")
On constate que l’instruction ci-dessus donne la bonne ann´ ee, mais renvoie en fait le jour et le mois de la date actuelle.
3.5- On lit sur le calendrier que le premier lundi de la 44
e semaine correspond
au 29 octobre 1984.
3.6- strptime("1984441",format="%Y%W%w")
3.7- grippe$Date[1:10]
strptime(paste(as.character(grippe$Date[1:10]),"1",sep=""),
format="%Y%W%w")
On constate sur le calendrier du site web que cela ne fonctionne pas pour
le 31 d´ ecembre 1984. Il faudrait plutˆ ot utiliser :
strptime("1984531",format="%Y%W%w")
alors que l’on a utilis´ e :
strptime("1985011",format="%Y%W%w")
Il y a donc un probl` eme avec le format des semaines.
3.8- date1 <- as.POSIXlt("29,10,1984",format="%d,%m,%Y")