前回、性別と人種という二つのカテゴリカルデータを定義づけたので、ちょっともう一度図にしてみる。
s<- read.csv(“yome.csv”,header=T,sep=’,’)
s$sex<-factor(s$sex,levels=0:1,labels=c(“male”,”female”))
s$race<-factor(s$race,levels=0:2,labels=c(“white”,”black”,”yellow”))
plot(s$race,s$weight)
こんな感じで散布図にしてみた。
あらかじめ、性別は、数字ではなくカテゴリカルデータとして扱っているのでplotを使ってもいい感じにしてくれるはず。
おう!なんかいい感じの図が出来てきた。
この図の形成はこれから考えるとしてと。
どうやって保存するんだろうといろいろいじってみると、
R→ファイル→別名で保存。でできるみたい。
でも。。。
サイズとかいろいろできるみたいだけどまあ今のところはいっか。
そういえば、度数分布表を作っていなかった。
練習用データの中のcutom(習慣)とInhe(遺伝)は5件法のデータなので、ヒストグラムを作る。
これは結構簡単だった。
hist(s$custom,right=FALSE)
これでよし。
こういうのをひっくるめてfurequency 関数というヤツもあるみたいなのだが、もっと根本的なことが分かってからにしよっと。
たちまち今までの復習。
Rエディタにまとめておいとく。#を使ってメモ。
とりあえず少しずつだな。
次は、分散分析にチャレンジ!!
コメントができないの?
コメント確認。
クロンバックのalpha係数も出してみよう! でも、確か何かパッケージを入れなきゃいけなかったはず。
はやめにやらないといけませんね。ちょっとMacが落ち着くまで・・・