Je voudrais produire un graphe avec le nombre de descendants par père, des plus prolifiques aux moins prolifiques.
J'ai un fichier de pedigree (animal, père, mère) et j'obtiens l'effectif par reproducteur avec la fonction table
Code : Tout sélectionner
listper<-table(ped_new$sire)
listper<-data.frame(listper)
listper<-listper %>% arrange(-Freq)
j'ai fait un tri sur -Freq afin d'obtenir l'ordre souhaité.
Code : Tout sélectionner
> head(listper)
Var1 Freq
1 B_20020341 16
2 B_20020487 13
3 B_20020398 12
4 B_20020444 12
5 B_20020372 9
6 B_20020424 9
Ensuite je voudrais produire le graphe.
Mais le code suivant :
Code : Tout sélectionner
ggplot(data = listper,aes(x=Var1,y=Freq))+
geom_bar(stat="identity") +
theme(axis.text.x = element_text(angle=45,vjust=1,hjust=1))+
labs(title="Nombre de descendants par mâle Barbarie",
x ="Mâle Barbarie", y = "Fréquence")
me produit un graphe où les colonnes sont ordonnées par ID croissante du père et non par le nombre de descendants décroissant.
Comment puis-je changer l'ordre des barres ?
Merci.