Zmień kolejność pasków w geom_bar ggplot2

119

Próbuję wykonać wykres słupkowy, w którym wykres jest uporządkowany od miRNAnajwyższego valuedo miRNAnajniższego. Dlaczego mój kod nie działa?

> head(corr.m)

        miRNA         variable value
1    mmu-miR-532-3p      pos     7
2    mmu-miR-1983        pos    75
3    mmu-miR-301a-3p     pos    70
4    mmu-miR-96-5p       pos     5
5    mmu-miR-139-5p      pos    10
6    mmu-miR-5097        pos    47

ggplot(corr.m, aes(x=reorder(miRNA, value), y=value, fill=variable)) + 
  geom_bar(stat="identity")
user3741035
źródło

Odpowiedzi:

216

Twój kod działa dobrze, z wyjątkiem tego, że wykres kreskowy jest uporządkowany od niskiego do wysokiego. Chcąc uporządkować słupki od najwyższego do najniższego, należy wcześniej dodać -znak value:

ggplot(corr.m, aes(x = reorder(miRNA, -value), y = value, fill = variable)) + 
  geom_bar(stat = "identity")

co daje:

wprowadź opis obrazu tutaj


Wykorzystane dane:

corr.m <- structure(list(miRNA = structure(c(5L, 2L, 3L, 6L, 1L, 4L), .Label = c("mmu-miR-139-5p", "mmu-miR-1983", "mmu-miR-301a-3p", "mmu-miR-5097", "mmu-miR-532-3p", "mmu-miR-96-5p"), class = "factor"),
                         variable = structure(c(1L, 1L, 1L, 1L, 1L, 1L), .Label = "pos", class = "factor"),
                         value = c(7L, 75L, 70L, 5L, 10L, 47L)),
                    class = "data.frame", row.names = c("1", "2", "3", "4", "5", "6"))
Jaap
źródło
z jakiegoś powodu nie zostaje uporządkowany na mojej działce
user3741035
@ user3741035 Dziwne. Czy użyłeś go na przykładowym zbiorze danych, który podałeś powyżej, czy na całym zbiorze danych?
Jaap
Której wersji R & ggplot używasz? Czy możesz również przygotować większy przykładowy zestaw danych (najlepiej z więcej niż jedną wartością dla variable)?
Jaap
6
znalazłem rozwiązanie: załadowałem bibliotekę (gplots), która zepsuła wszystko
user3741035
1
@maycca Daje mi poprawny wynik (na obu OSX 10.10.4 / Windows 7, R 3.2.3 i ggplot2 2.1.0). Może powinieneś zacząć od nowej sesji?
Jaap