ファセットラベルをグラフの上に移動するにはどうすればよいですか？

Question

3つのプロットが垂直を重ねて、私は、そうのような多面的なプロットを作成することができます。私は、水平に行わしたい場合、彼らは次のようになりよう

ggplot(iris, aes(Petal.Length)) + stat_bin() + facet_grid(Species ~ .) 

は、各グラフの上部にラベルを移動することが可能ですfacet_grid(. ~ Species)とスタッキングしていますか？

私のプロットは長い時間系列のプロットであるため、それぞれのプロットの幅が必要ですが、各プロットのラベル（本質的にファセットを説明するタイトルとして機能します）は長すぎますプロットの右側にある小さなラベル領域に収まります。はい

ggplot(iris, aes(Petal.Length)) + stat_bin() + facet_wrap(~Species,nrow = 3) 

Answer 1

：

Answer 2

はこれを試してみてください。代わりにfacet_gridのfacet_wrapを使用しても引数ncol=1指定してください：

ggplot(iris, aes(Petal.Length)) + stat_bin() + facet_wrap(~Species, ncol=1)