Souci pour séparer des données sur un histogramme

Bonjour !

Voilà, je me suis remis à R après 2-3ans sans y toucher et j'ai découvert ggplot (quel magnifique outil). Seulement voilà, après 2 semaines à potasser les bases pour me remettre à niveau, j'ai beau écumer les sites et forums, impossible d'obtenir ce que je souhaite ! Explication ci-dessous...

Voici mon tableau de données :
Pièce jointe 525813

A partir de ces données, j'aimerais faire un histogramme avec en abscisses les différents endos, et en ordonnées la surface indiquée avec, pour chaque endo, une barre CTRL et une barre PIF_50 côte à côte.
Du coup, j'ai mis ce code :
Pièce jointe 525817

Et ça me donne ce graphique :
Pièce jointe 525821

Comme vous voyez, j'ai diminuer l'opacité pour qu'on puisse voir les deux bandes pour CTRL et pour PIF_50, seulement elles ne sont pas côte-à-côte, elles sont superposées ! J'ai essayé les fonctions "positions" et "position_dodge", j'ai tenté de mettre cette fonction sur chaque sous-ensemble geom mais rien à faire =/ Je ne comprends pas pourquoi mes bandes sont superposées.

Une idée les gens ?

Bonjour,

le plus simple avec la librairie ggplot2 est d'avoir un tableau en format "long", avec une colonne pour les x, une pour les y et une autre pour la couleur :

Code:

---

1 2 3 4 5 6

library(tidyr) tabl <- pivot_longer(tab, c("CTRL", "PIF50")) ggplot(tabl, aes(x = endo, y = value, fill = name)) + geom_histogram(position = "dodge2", stat = "identity") + scale_fill_manual(values = c("CTRL" = "red", "PIF50" = "blue")) # si tu veux enlever la légende : theme(legend.position = "none")

---

Il y a pas mal de fonction pour passer d'un tableau en format large vers un tableau en format long, comme reshape, ou melt (library reshape2) ou gather (tidyr), etc.

cdlt

Bonjour !

Merci, ça marche tout de suite beaucoup mieux ^^ Je suppose que mon tableau n'était pas suffisamment "tidy" pour ggplot =)