見出し画像

R | ggplot | scale_y_reverse | y軸を反転させたい

*ハイライト*
・棒グラフのy軸(連続値)を反転させることができる
・連続値はscale_y_reverse()で反転する

install.packages("tidyverse") 
library(ggplot2)

df <- data.frame(
 subject = c("x1", "x2", "x3", "x4", "x5", "x6"),
 weight = c(45, 53, 56, 72, 65, 50))
head(df, 2)

g <- ggplot(df, aes(x = subject, y = weight))+
 geom_bar(stat = "identity")+
 scale_y_reverse()
plot(g)

コードの説明

#パッケージのインストール

最初にパッケージをRにインストールしましょう。gglpot2tidyverseはパッケージに内包されているので,tidyverseをインストールし,ggplot2をライブラリーします。

install.packages("tidyverse") 
library(ggplot2)

#データフレームの作成

ggplotで棒グラフを作成するために被験者6人の体重を表しているデータフレームを作成します。subjectは「被験者」を,weightは「体重」を表しています。

df <- data.frame(
 subject = c("x1", "x2", "x3", "x4", "x5", "x6"),
 weight = c(45, 53, 56, 72, 65, 50))
head(df, 2)

  subject  weight
1    x1    45
2    x2    53
:     :     :

#棒グラフの描画

ggplotで被験者をX軸に,体重をY軸にマッピングし,体重の値に従って棒グラフを作成します。まずggplotのなかに使用するデータフレーム,データセットの中の変数をX軸やY軸に割り当てます。今回は体重の値をそのまま表示させたいので,geom_bar()の中身をstat = "idenetity"にしました(1)。

g <- ggplot(df, aes(x = subject, y = weight))+ 
 geom_bar(stat = "identity") 
plot(g)

#図のY軸(連続値)の並び替え

Y軸(連続値)の反転させるためにscale_y_reverse()を書き加えます。

g <- ggplot(df, aes(x = subject, y = weight))+
 geom_bar(stat = "identity")+
 scale_y_reverse
plot(g)

#エラーの出し方

もしX軸もY軸と同じようにscale_*_reverseで反転せるようにするとX軸は連続値ではなく離散値であるため,以下のようなエラーがでます。エラーの内容は離散値が連続値が必要な部分に代入されたことを示しています。

g <- ggplot(df, aes(x = subject, y = weight))+
 geom_bar(stat = "identity")+
 scale_x_reverse()
plot(g)

Error in -x : invalid argument to unary operator

■Rグラフィックスクックブック 2 ―ggplot2によるグラフ作成のレシピ集/Winston Chang (), 石井 弓美子 (翻訳), 河内 (翻訳), 瀬戸山 雅人 (翻訳)

改訂2 RユーザのためのRStudio[実践]入門〜tidyverseによるモダンな分析フローの世界/松村 優哉 (), 湯谷 啓明 (), 紀ノ定 保礼 (), 前田 和寛 ()

■Rが生産性を高める〜データ分析ワークフロー効率化の実践/igjit (), atusy (), hanaori ()

#心理学

いいなと思ったら応援しよう!