Affichage de la fréquence au lieu de compter avec geom_bar() dans ggplot

Sur cette page, ils donnent l'exemple suivant

library(ggplot2)
library(reshape2)
ggplot(data=tips, aes(x=day)) + geom_bar(stat="bin")

Au lieu d'un nombre j'aimerais avoir une fréquence dans l'axe des ordonnées. Comment puis-je y parvenir?

OriginalL'auteur Remi.b | 2013-11-07

  1. 29

    Voici la solution qui peut être trouvé dans une question relative à la:

    pp <- ggplot(data=tips, aes(x=day)) + 
      geom_bar(aes(y = (..count..)/sum(..count..)))

    Si vous souhaitez étiquette de fréquences en pourcentage, ajouter ce (voir ici):

    library(scales)
pp + scale_y_continuous(labels = percent)
    Quelle est la signification de la dot-dot notation dans ..count..? Avez-vous une référence à qui?
    Jetez un oeil à question.
    Comment voulez-vous obtenir des étiquettes de données pour les fréquences, pour être affichée au-dessus de chaque barre?
    Je souhaite vraiment que geom_bar généré le ..density.. variable, comme son cousin fonction geom_histogram.
    Je pense pense labels=percent dans scale_y_continuous(labels = percent) doesnt work anymore

    OriginalL'auteur tonytonov

  2. 7

    maintenant ..prop.. est disponible

    ggplot(data=tips, aes(x=day)) + 
  geom_bar(aes(y = ..prop.., group = 1))
    Ce fonctionne si vous êtes à l'aide de facettes, tandis que le ..count.. option ne fonctionne pas!
    voulez-vous dire en ajoutant par exemple facet_wrap(~sex)? Il fonctionne avec les deux pour moi.
    Je devrais avoir défini les "œuvres". Il permettra de créer une figure si vous utilisez ..count../sum(..count..), mais la fréquence somme de 1 sur toutes les facettes (je pense). Si vous utilisez ..prop.., la fréquence somme de 1 dans chaque facette. Peut-être que cela dépend de ce que vous essayez de montrer.
    et ..prop fonctionnent exactement de la même chose pour moi aussi longtemps que vous définissez group = 1
    ggplot(data=tips, aes(x=day)) + geom_bar(aes(y = ..prop.., group = 1)) + facet_wrap(~sex) et ggplot(data=tips, aes(x=day)) + geom_bar(aes(y = (..count..)/sum(..count..), group = 1)) + facet_wrap(~sex) ne donnent pas le même tracé pour moi. Vous pouvez également supprimer group=1 dans le ..count.. version et il a la même apparence.

    OriginalL'auteur Dambo