Discussion :

[JonathanJohns]

Bonjour,

Je possède une colonne "Semaine" dans un tableau au format charactère. La colonne a été obtenu suite à l'utilisation de la fonction ISOWeek. Je n'arrive pas à convertir cette colonne au format date en gardant la même structure pour l'utiliser dans un graphique.

Voici la colonne en question :

0017-W15

0017-W16

0017-W18

J'ai essayé d'utiliser la fonction as.Date mais le fait que la colonne soit en format charactère bloque la fonction. Avez vous une idée de comment faire s'il vous plait ?

[mgdondon]

Bonjour Jonathan,

Il faut indiquer le format d'import :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
> df <- data.frame(V1=c("0017-W15","0017-W16","0017-W18"))
> df$V2 <- as.Date(paste(df$V1,1), format="00%y-W%U %u")
> df
        V1         V2
1 0017-W15 2017-04-10
2 0017-W16 2017-04-17
3 0017-W18 2017-05-01

NB : L'instruction paste(df$V1,1) complète la date au format texte avec le premier jour de la semaine.

Il est alors possible d'afficher la date dans son format initial :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
> format(df$V2,"00%y-W%U")
[1] "0017-W15" "0017-W16" "0017-W18"

Cordialement,

[JonathanJohns]

Bonjour mgdondon,

Merci de votre réponse. En suivant ce code, le format que j'obtiens n'est pas de classe "DATE". Le problème vient donc lorsque je fais un graphique que l'axe des abscisses apparaît avec des valeurs numériques et non un format semaine.

Voici le graphe en question :



Avec le code correspondant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

plot(dataset[,1], dataset$V1, axes=F, xlab="", ylab="", type="b",col="black")

Je souhaiterai à la place de cette axe des abscisses avoir mes semaines d'où passer la colonne semaine en format date.

Quand je travaille par jour, j'utilise la fonction suivante pour l'axe des abscisses mais ma colonne est déja en format date.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

axis.POSIXct(1, at=seq(from=min(dates), to=max(dates), by="day"), format="%m-%d", las=2)

[mgdondon]

La variable V2 ainsi créée est bien de type date :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
> df <- data.frame(V1=c("0017-W15","0017-W16","0017-W18"))
> df$V2 <- as.Date(paste(df$V1,1), format="00%y-W%U %u")
> str(df)
'data.frame':   3 obs. of  2 variables:
 $ V1: Factor w/ 3 levels "0017-W15","0017-W16",..: 1 2 3
 $ V2: Date, format: "2017-04-10" "2017-04-17" ...

Je pense que c'est dans votre fonction axis.POSIXct() que vous devez définir le format d'affichage en semaines.

Cordialement,