の続きです。
今回はR言語のgeom_bar関数で棒グラフを描いてみます。
例えば、2015年、yearend, 1～4人、全国除くだと、
となります。tokyo, osaka, kantoshinetsu, nagoya, fukuokaという順番です。
facet_grid関数を使って、yearとitemの 2x2の棒グラフを描きます。
これを他の規模でも同じようにします。
まずは、function関数で上のコードを再現する関数を作ります。
この関数をsapply関数を5～9人で試してみましょう。
うまくできました。
lapply関数で、全てのkiboについて、一つのコマンドで実行します。
まず、gridExtraパッケージを読み込みます。
そして、lapply関数で各kiboのグラフオブジェクトを作成します。
このkibo_graphがうまくいったか確認してみます。
うまくいきました。
それでは、gridExpandパッケージのgrid.arrange関数で９つのグラフをいっぺんに表示しましょう。
このようになります。事業所の規模が大きいところは、tokyoの人数が突出していますね。
今回は以上です。
