Döndürme ben birbirimizi kullanarak facet_grid üstünde bazı barplots çizilecek

Question

istiyorum facet_grid ggplot2 içinde faset etiketleri anahtarlamalı Her bir yüzün üstünde eksen yerine. Sorun, faset etiketlerinin dikey olarak çizilmesi ve bu nedenle kırpılmasıdır. Faset panellerini yatay olarak çizmenin bir yolu var mı? Şimdiye kadar bulduğum tüm sorular sadece x ekseni etiketlerini döndürmekle ilgili, faset etiketleri değil.

Answer 1

sadece tema (ekleyin) ve

library(ggplot2) 
df <- group_by(mpg, manufacturer) %>% 
    summarise(cty = mean(cty), hwy = mean(hwy)) %>% 
    ungroup() 

df <- melt(df, id.vars = "manufacturer") 

ggplot() + 
    geom_bar(data =df, aes(x = variable, y = value), stat = "identity") + 
    facet_grid(manufacturer ~ ., switch = "y")+ 
theme(strip.text.y = element_text(angle = 180))