Bonjour,
J'essaie de réaliser un graphique avec la fonction ggplot. Je souhaite mettre pour chaque jour la moyenne de ma variable avec l'écart-type en barre d'erreur.
Voici les graphiques que j'ai réalisé :
Et voici les codes correspondants :
Pour le graphique du haut :
Pour le graphique en bas :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 library(ggplot2) E1=dataset[,1] E2=dataset[,2] E3=dataset[,3] T1=colnames(dataset)[1] T2=colnames(dataset)[2] T3=colnames(dataset)[3] # Données d'abscisses dates = as.POSIXct(dataset[,1]) dates = strptime(dates, "%Y-%m-%d") p<- ggplot(dataset, aes(x=dates, y=E2)) + geom_line() + geom_point()+ geom_errorbar(aes(ymin=E2-E3, ymax=E2+E3), width=.2, position=position_dodge(0.05)) p<- p+labs( x=T1, y = T2) print(p)
Je cherche à rajouter sur le graphique du bas la ligne continue comme sur celui du haut et le format date de l'abscisse identique à celui du haut mais je n'y arrive pas. Dès que je modifie mon axe X en format date, le graphique du bas se transforme comme celui du haut et je n'arrive plus à avoir les barres d'erreur comme elles sont actuellement dans le graphique du bas. Avez vous une proposition s'il vous plait ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 library(ggplot2) E1=dataset[,1] E2=dataset[,2] E3=dataset[,3] T1=colnames(dataset)[1] T2=colnames(dataset)[2] T3=colnames(dataset)[3] p<- ggplot(dataset, aes(x=E1, y=E2)) + geom_line() + geom_point()+ geom_errorbar(aes(ymin=E2-E3, ymax=E2+E3), width=.2, position=position_dodge(0.05)) p<- p+labs( x=T1, y = T2) print(p)
Bonne journée.
Partager