Bonjour à tous,

Je travaille sur des données que j'aimerais représenter sous forme de graphique côte à côte en fonction de mes deux départements. J'ai généré un dataframe qui y ressemble :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
> test = data.frame(type_transport = sample(c("A PIED", "VOITURE", "TRANSPORT COMMUN"), 5000, replace = T), type_route = sample(c("N", "D", "A", "VC"), 5000, replace = T), departement = sample(c("VAR", "BOUCHE-DU-RHONE"), 5000, replace = T), longueur_troncon_km = sample(x = 0 : 17, 5000, replace = T))
En entrant cette formule, j'obtiens bien un graphique barres :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
> ggplot(test, aes(x = type_route, y = longueur_troncon_km, fill = departement)) + geom_bar(stat = "identity")
https://zupimages.net/viewer.php?id=20/19/vt1s.png

A présent, je voudrais séparer ces barres en deux, pour afficher les données en fonction de mes deux départements. Pour cela, j'utilise position = "dodge" :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
> ggplot(test, aes(x = type_route, y = longueur_troncon_km, fill = departement)) + geom_bar(stat = "identity", position = "dodge")
Mais là, il y a un problème. L'échelle en Y est beaucoup trop petite par rapport à la réalité (on passe de plusieurs milliers sur le premier graphique à 15 sur le deuxième). J'ai visiblement loupé quelque chose ...

https://zupimages.net/viewer.php?id=20/19/sbh5.png

D'après la doc, geom_col semble être plus approprié pour mon exemple car les valeurs sont "déjà calculées". Mais pour être honnête, j'ai passé un bon bout de temps à chercher une solution par mes propres moyens sur internet, forum, doc, etc. Je n'ai pas trouvé de solution à mon problème.

Merci.