Bonjour,
j'ai une base de données appelée 'base1' ressemblant à ceci :

Nom : Capture.PNG
Affichages : 1594
Taille : 16,8 Ko

Il y'a 4 colonnes : la 1 sert comme date en x et de 2:4 trois graphiques devraient être générés, chacun en fonction de la date.

Voici mon graphique pour la variable en colonne 2 qui fonctionne parfaitement:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
library(ggplot2)
library(scales)
ggplot(base1, aes(x = Date, y = PrixIndiceG_NewF)) +
  geom_line(color = "indianred3", 
            size=1 ) +
  geom_smooth() +
  labs(title = "Titre",
       subtitle = "2017 à 2020",
       x = "Date",
       y = "Nom de la variable") +
  theme_minimal()
Pour ma boucle, j'ai essayé plusieurs choses :

1) une fonction qui n'a pas marché :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
plotTimeseries = function(x, na.rm = TRUE) {
  nm = names(x)
  for (i in 2:4) {
    print(ggplot(x, aes(x=Date,y=nm[i] ) + geom_line()+
  geom_smooth())
    }
}
plotTimeseries(base1)

2) Une loop
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
plots=list()
for (i in 2:4){
plots=ggplot(base1[,i], aes(x=Date,y=base1[,i]) + geom_line()+
  geom_smooth()
}
print(plots)
Aucune ne fonctionne, svp avez-vous des idées ?

Merci