web-dev-qa-db-ja.com

ggplot2の切り替えられたファセットラベルを回転させるfacet_grid

Facet_gridを使用して、いくつかのバープロットを互いの上にプロットしたいと思います。

_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")
_

ggplot2::facet_grid()のswitchargumentを使用して、ファセットラベルを各ファセットの上ではなくy軸に表示します。問題は、ファセットラベルが垂直にプロットされるため、トリミングされることです。ファセットラベルを水平にプロットする方法はありますか？私がこれまでに見つけたすべての質問は、ファセットラベルではなく、x軸ラベルの回転に関連しています。

rplotggplot2facet-grid
30
roming

theme()を追加し、strip.text.yで角度を指定するだけです。

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))
50
joel.wilson