ggplot2できれいに図をかけるがちょっと敷居が高い．そこでeasyGgplot2パッケージでggplot2を使ってみる．なお，easyGgplot2はGitHubで開発中のパッケージ．
インストールは以下のように行う．
> install.packages("devtools")
> library(devtools)
> install_github("easyGgplot2", "kassambara")
で，箱ひげ図の描き方は以下の通り．
まずはデータセットを用意．（いつものようにエクセルに作ったデータを読み込む）
データは被験者11名が4条件下（A～D）での心拍数（HR）と平均血圧（MBP）．
> dat<-read .delim="" clipboard="" header="TRUE)</p">
> dat
participants tsk HR MBP
1 No.1 A 63 71
2 No.2 A 61 74
3 No.3 A 61 79
4 No.4 A 63 79
5 No.5 A 70 75
6 No.6 A 57 71
7 No.7 A 55 70
8 No.8 A 63 76
9 No.9 A 64 78
10 No.10 A 52 73
11 No.11 A 70 78
12 No.1 B 65 70
13 No.2 B 80 75
14 No.3 B 74 75
15 No.4 B 72 73
16 No.5 B 67 75
17 No.6 B 70 75
18 No.7 B 65 70
19 No.8 B 74 73
20 No.9 B 72 75
21 No.10 B 74 77
22 No.11 B 80 72
23 No.1 C 78 83
24 No.2 C 72 81
25 No.3 C 72 88
26 No.4 C 75 89
27 No.5 C 68 86
28 No.6 C 72 82
29 No.7 C 65 87
30 No.8 C 66 90
31 No.9 C 77 80
32 No.10 C 69 92
33 No.11 C 79 95
34 No.1 D 84 96
35 No.2 D 90 92
36 No.3 D 94 91
37 No.4 D 92 96
38 No.5 D 84 90
39 No.6 D 86 95
40 No.7 D 81 89
41 No.8 D 88 97
42 No.9 D 81 80
43 No.10 D 83 87
44 No.11 D 95 89
>
箱ひげ図を描く
> ggplot2.boxplot(data=dat, xName="tsk",yName="HR",ytitle="Heart_Rate (bpm)",xtitle="",addDot=TRUE, dotSize=0.5, dotPosition="center",backgroundColor="white", fill='white',removePanelGrid=TRUE,removePanelBorder=TRUE,axisLine=c(1, "solid", "black"),ylim=c(0,100))
あまり説明は不要かと思うが， data=でデータを指定，ｘNameもしくはｙNameでどの列のデータかを指定．ytitle，xtitleでそれぞれY軸，X軸のタイトルを指定．
addDotはなくても良いが，箱ひげ図にすべての生データを重ねて表示する場合に使用．dotSizeで生データのドットの大きさを指定．dotPositonはドットの配置の仕方．図の背景は無地としたかったのでとりあえずbackgroundColorで指定．補助メモリや枠の線がはあまり好きでないのでremovePanelGridやremovePanelBorderで削除（ggplot2の図ではあっても綺麗だからいいような気もするが…）．軸だけを入れなおすのにaxisLineを使う．ylimはY軸の範囲指定．
で，図はこんな感じになる．
ちなみにggplot2のデフォルトの背景にしてもそんなに悪くない気がする．
下記の通り．
> ggplot2.boxplot(data=dat, xName="tsk",yName="HR",ytitle="Heart_Rate (bpm)",xtitle="",addDot=TRUE, dotSize=0.5, dotPosition="center",)
ggplot2もeasyGgplot2で本当に簡単になる．すばらしい．
以上．
インストールは以下のように行う．
> install.packages("devtools")
> library(devtools)
> install_github("easyGgplot2", "kassambara")
で，箱ひげ図の描き方は以下の通り．
まずはデータセットを用意．（いつものようにエクセルに作ったデータを読み込む）
データは被験者11名が4条件下（A～D）での心拍数（HR）と平均血圧（MBP）．
> dat<-read .delim="" clipboard="" header="TRUE)</p">
> dat
participants tsk HR MBP
1 No.1 A 63 71
2 No.2 A 61 74
3 No.3 A 61 79
4 No.4 A 63 79
5 No.5 A 70 75
6 No.6 A 57 71
7 No.7 A 55 70
8 No.8 A 63 76
9 No.9 A 64 78
10 No.10 A 52 73
11 No.11 A 70 78
12 No.1 B 65 70
13 No.2 B 80 75
14 No.3 B 74 75
15 No.4 B 72 73
16 No.5 B 67 75
17 No.6 B 70 75
18 No.7 B 65 70
19 No.8 B 74 73
20 No.9 B 72 75
21 No.10 B 74 77
22 No.11 B 80 72
23 No.1 C 78 83
24 No.2 C 72 81
25 No.3 C 72 88
26 No.4 C 75 89
27 No.5 C 68 86
28 No.6 C 72 82
29 No.7 C 65 87
30 No.8 C 66 90
31 No.9 C 77 80
32 No.10 C 69 92
33 No.11 C 79 95
34 No.1 D 84 96
35 No.2 D 90 92
36 No.3 D 94 91
37 No.4 D 92 96
38 No.5 D 84 90
39 No.6 D 86 95
40 No.7 D 81 89
41 No.8 D 88 97
42 No.9 D 81 80
43 No.10 D 83 87
44 No.11 D 95 89
>
箱ひげ図を描く
> ggplot2.boxplot(data=dat, xName="tsk",yName="HR",ytitle="Heart_Rate (bpm)",xtitle="",addDot=TRUE, dotSize=0.5, dotPosition="center",backgroundColor="white", fill='white',removePanelGrid=TRUE,removePanelBorder=TRUE,axisLine=c(1, "solid", "black"),ylim=c(0,100))
あまり説明は不要かと思うが， data=でデータを指定，ｘNameもしくはｙNameでどの列のデータかを指定．ytitle，xtitleでそれぞれY軸，X軸のタイトルを指定．
addDotはなくても良いが，箱ひげ図にすべての生データを重ねて表示する場合に使用．dotSizeで生データのドットの大きさを指定．dotPositonはドットの配置の仕方．図の背景は無地としたかったのでとりあえずbackgroundColorで指定．補助メモリや枠の線がはあまり好きでないのでremovePanelGridやremovePanelBorderで削除（ggplot2の図ではあっても綺麗だからいいような気もするが…）．軸だけを入れなおすのにaxisLineを使う．ylimはY軸の範囲指定．
で，図はこんな感じになる．
ちなみにggplot2のデフォルトの背景にしてもそんなに悪くない気がする．
下記の通り．
> ggplot2.boxplot(data=dat, xName="tsk",yName="HR",ytitle="Heart_Rate (bpm)",xtitle="",addDot=TRUE, dotSize=0.5, dotPosition="center",)
ggplot2もeasyGgplot2で本当に簡単になる．すばらしい．
以上．
コメント