Echelle du graphique dans Rstudio

Postez ici vos questions, réponses, commentaires ou suggestions - Les sujets seront ultérieurement répartis dans les archives par les modérateurs

Modérateur : Groupe des modérateurs

Pierre Konan
Messages : 5
Enregistré le : 27 Juin 2018, 13:19

Echelle du graphique dans Rstudio

Messagepar Pierre Konan » 28 Juin 2018, 08:15

Bonjour je voudrais savoir comment mettre la meme echelle sur deux graphiques différents pour pourvoir faire une comparaison.
gradué peut-être de 5 en 5 ou à ma convenance. Voici la commande utilisée.

par(mfrow = c(1,2))

hist(indiv_primipares$PV, main="brebis primipares", ylab="nombre d'enregistrement",xlab ="Poids vif en kg", xlim = c(40,110), ylim=c(0,350))
hist(indiv_multipares$PV, main="brebis multipares", ylab="nombre d'enregistrement",xlab ="Poids vif en kg", xlim = c(40,110), ylim=c(0,350))

Logez Maxime
Messages : 3138
Enregistré le : 26 Sep 2006, 11:35

Re: Echelle du graphique dans Rstudio

Messagepar Logez Maxime » 28 Juin 2018, 09:29

Bonjour,

avec l'argument breaks tu peux spécifier les bornes des intervalles pour tracer l'histogramme :

Code : Tout sélectionner

hist(indiv_primipares$PV, main="brebis primipares", ylab="nombre d'enregistrement",xlab ="Poids vif en kg", xlim = c(40,110), ylim=c(0,350),
breaks = seq(40, 110, by = 5))
Cordialement,
Maxime

Pierre Konan
Messages : 5
Enregistré le : 27 Juin 2018, 13:19

Re: Echelle du graphique dans Rstudio

Messagepar Pierre Konan » 28 Juin 2018, 12:21

Merci beaucoup pour le soutient, un dernier souci bien qu'il fasse la division voulu cependant sur xlim il n'apparait pas.
Par exemple de (5 en 5) il fait le découpage au niveau du diagramme mais la graduation ne suit pas.
Comment puisse graduer de la même façon que le découpage.

Mickael Canouil
Messages : 1315
Enregistré le : 04 Avr 2011, 08:53
Contact :

Re: Echelle du graphique dans Rstudio

Messagepar Mickael Canouil » 28 Juin 2018, 15:12

Bonjour,

Une proposition via ggplot2, (non testé faute d'extrait de vos données):

Code : Tout sélectionner

library(tidyverse)

indiv <- bind_rows(
  indiv_primipares %>%
    mutate(Species = "primipares"),
  indiv_multipares %>%
    mutate(Species = "multipares")
)
ggplot(data = indiv, aes(x = PV)) +
  geom_histogram() +
  facet_grid(~Species) +
  labs(
    title = "Brebis",
    y = "nombre d'enregistrement",
    x = "Poids vif en kg"
  )


Cordialement,
Mickaël
mickael.canouil.fr | rlille.fr

Logez Maxime
Messages : 3138
Enregistré le : 26 Sep 2006, 11:35

Re: Echelle du graphique dans Rstudio

Messagepar Logez Maxime » 28 Juin 2018, 15:19

re,

en définissant toi même les axes. D'une part dans la fonction hist tu lui spécifies de ne pas tracer les axes et ensuite avec la fonction axis tu les traces avec les options que tu souhaites :

Code : Tout sélectionner

hist(indiv_primipares$PV, main="brebis primipares", ylab="nombre d'enregistrement",xlab ="Poids vif en kg", xlim = c(40,110), ylim=c(0,350),
breaks = seq(40, 110, by = 5), axes = FALSE)
axis(2) # pour les ordonnées
axis(1, at = seq(40, 110, by  = 5))
Une autre alternative est d'utiliser la librairie ggplot2 en lien avec la librairie tidyr :

Code : Tout sélectionner

library(magrittr)
library(tidyr)
library(ggplot2)

tab <- data.frame(primipares = indiv_primipares$PV, multipares = indiv_multipares$PV)
tab %>% gather(variable, valeur) %>%
  ggplot(aes(x = valeur)) + geom_histogram(breaks = seq(40, 110, by = 5)) + ylim(0 , 350) +
  facet_wrap(~variable) + scale_x_continuous(breaks = seq(4, 110, by = 5)) +
  theme(axis.text.x  = element_text(angle=90, vjust=0.5),
        panel.grid.minor=element_blank())
Cordialement,
Maxime

Pierre Konan
Messages : 5
Enregistré le : 27 Juin 2018, 13:19

Re: Echelle du graphique dans Rstudio

Messagepar Pierre Konan » 28 Juin 2018, 19:23

merci pour votre aide le problème a été resolu, vous avez été d'un grand secours!


Retourner vers « Questions en cours »

Qui est en ligne

Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 1 invité