Discussion :

[marou1991]

Bonjour,

J'ai crée ce graphique avec ggplot2 , je veux plutôt un graphique dynamique du style package googlevis sur R ou autre svp

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
df = data.frame(Canal  = c("Courrier" ,"Email" ,   "SMS"    ,  "Email"   , "SMS") ,
                Year = c("2018", "2018", "2018" ,"2019" ,"2019"),
                nom_campagne = c( 2 , 96,   1, 157 ,  1) ,
                nom_diffusion = c(4, 215  , 2 ,301 ,  1))
 
ggplot(data=df
       , aes(x=Year, y=nom_campagne, fill=Canal)) +
  geom_bar(stat="identity")+
  geom_text(aes(y=nom_campagne, label=Year), vjust=1.6, 
            color="white", size=3.5)+
  scale_fill_brewer(palette="Paired")+
  theme_minimal()