アットウィキロゴ

第4章 「質的データ」を含んだ「基本統計量」①(p.43~53)


ハンバーガーショップの男性と女性と購入金額

[1]「要約統計量」を求める

  • table() 度数を求める
  • barplot() 棒グラフを作る
  • hist() ヒストグラムを作る


[2]「層別の分析」と「データ・フレーム」

①データ・フレーム

  • data.frame() 「データ・フレーム」を作る
  複数の種類のデータを対応付けて、一つのデータの塊にする

②「層別」の「要約統計」を求める

  • tapply(目的変数、層別変数、統計関数)  層別の統計量を求める
  • by(データ・フレーム、分類変数、summary) 層別にまとめ統計量を記述する


[3]データを「層別」に分ける

  • subset(データ・フレーム、検索条件) データフレームから必要な部分を抽出する。
  • par(mfrow=c(タテの数、ヨコの数)  1枚のGraphic画面に複数のグラフを描く


[練習問題4.3]


実行したプログラム

sex<-c("M","M","F","M","F","F","F","M","F","F",
      "F","M","M","M","M","F","F","M","F","M",
      "M","M","F","F","F","M","F","M","M","M")
money<-c(580,700,475,635,650,550,400,375,350,550,
        475,755,465,585,625,575,385,490,520,670,
        575,480,555,495,500,590,530,590,650,480)
sex
money

table(sex)
barplot(table(sex))

summary(money)
sd(money)
hist(money)

hamburger<-data.frame(sex,money)
hamburger

tapply(money,sex,mean)
by(hamburger,sex,summary)
boxplot(money~sex)

m.hamburger<-subset(hamburger,sex=="M")
f.hamburger<-subset(hamburger,sex=="F")

m.hamburger
f.hamburger

par(mfrow=c(2,1))
hist(m.hamburger$money)
hist(f.hamburger$money)


出席コメント

  • 難しかったです。 -- P011003 石丸里美 (2013-05-07 17:52:29)
  • 前半は悪戦苦闘しましたが、何とか乗り切れました。 -- M010011 佐川綾香 (2013-05-07 17:53:37)
  • 実用的ですが、慣れるにはまだまだかかりそうです。 -- P011015 栄 美穂 (2013-05-07 17:54:15)
名前:
コメント:

最終更新:2013年07月02日 16:11