どうもどうも。昨日めっちゃ格闘したので（たぶん初心者すぎて）メモ書きとしてここにやり方を残しておこうと思います。

僕は修論のサンプルが少ないので、ハコを2グループ分つくって

>Lesson <-c(16, 55, 63, 73)

>Task <-c(59, 60, 60, 90)

みたいにしてデータを入れたあとに、

>boxplot(Lesson, Task)

で箱ヒゲ図を書くやり方でやってたんですね。

 

そのあとに、さっきの箱ヒゲ図の要領にadd=TRUEを加えて図を重ねようとしたわけです。

>install.packages(“beeswarm”)

>library(beeswarm)
>beeswarm(Lesson,Task, add=TRUE)

>

beeswarm(Lesson,Task,add=TRUE)
以下にエラー match.arg(method) : ‘arg’ must be NULL or a character vector

とこうなってしまうんですね。

http://www.cbs.dtu.dk/~eklund/beeswarm/

こういうとことか見てみても、あとは日本語のサイト

http://sssslide.com/www.slideshare.net/langstat/let-chubu-2013

http://cis-jp.blogspot.com/2012/08/blog-post_3858.html

とか見てみても、データを2つ入れたいときにはどうしたらいいのか書いてなくてorz というより僕は多分Rの基礎のところがいまいちまだよくわかってないからこういうことでつまってしまったんだと思っているんですが、それでもなんとか自力で重ねた図を書くことができました。以下その方法。

まず、エクセルでさっきのデータをシートに打ち込んでCSVで保存。

>data <-read.csv(“blogsample.csv”)

>data

 

でRにCSVを読み込んで確認。すると、こんな感じで、さっきはLessonとTaskという2つのハコに入ってたデータがdataというハコに一緒に入った形になります。

 

このdataで箱ヒゲ図を書きます。

>boxplot(data)

そして最後に、

>beeswarm(data,add=TRUE)

でビースウォームを重ねると、

サンプル少ないのでものっそい醜いですけどこんな感じになりますｗ

昨日やってたときは、箱ヒゲ図を書いたときのラベル名とビースウォームを出したときのラベル名がかぶって表示されてしまうというちょっとトリッキーなトラブルが発生して、

箱ひげ図書くときに、boxplot(x,y,names=c())でやってたのがよくなかったみたい。boxplot(cbind(x,y))で書いたあとにbeeswarm(data,add=TRUE)で重ねたらできた。あーこの作業に何時間かかったんだｗ

— Yu Tamuraさん (@tam07pb915) 2013年5月27日

ということをやったんですけど、今日は読み込んだCSVでboxplot()とbeeswarm()でなんの問題もなく完成したという。昨日のあの苦労はなんだったんだろう（遠い目

そんなわけでｼｺｼｺと作業しております。あと3週間…

では。

アメリカ New Hampshireより。

おしまい。