--- title: 『Rによるやさしい統計学』のお勉強 author: kazu634 date: 2011-02-12 url: /2011/02/12/_1661/ wordtwit_post_info: - 'O:8:"stdClass":13:{s:6:"manual";b:0;s:11:"tweet_times";i:1;s:5:"delay";i:0;s:7:"enabled";i:1;s:10:"separation";s:2:"60";s:7:"version";s:3:"3.7";s:14:"tweet_template";b:0;s:6:"status";i:2;s:6:"result";a:0:{}s:13:"tweet_counter";i:2;s:13:"tweet_log_ids";a:1:{i:0;i:5415;}s:9:"hash_tags";a:0:{}s:8:"accounts";a:1:{i:0;s:7:"kazu634";}}' categories: - つれづれ ---

文系の私はこれまで統計という言葉に「なんか凄そう」という感想しかいだいてこなかったが、それではいかんと思ってきたので、手を動かしてみることにした記録をここに残そうと思います。少しずつでもいいから進めていければと思います。

第二章 1つの変数の記述統計 

> hawks <- matrix(c(173,178,180,183,182,174,179,179,174,192,17000,14000,9000,50000,30000,12000,900,2100,1000,25000),10,2)
> hawks
[,1]  [,2]
[1,]  173 17000
[2,]  178 14000
[3,]  180  9000
[4,]  183 50000
[5,]  182 30000
[6,]  174 12000
[7,]  179   900
[8,]  179  2100
[9,]  174  1000
[10,]  192 25000
> procedure <- c("C", "B", "B", "A", "B", "C", "A", "D", "D", "D", "A", "A", "A", "C", "B", "D", "C", "C", "B", "D")
> procedure
[1] "C" "B" "B" "A" "B" "C" "A" "D" "D" "D" "A" "A" "A" "C" "B" "D" "C" "C" "B"
[20] "D"
> table(procedure)
procedure
A B C D
5 5 5 5
> hist(procedure)
以下にエラー hist.default(procedure) :  'x' は数値でなければなりません
> psycho_test <- c(13, 14, 7, 12, 10, 6, 8, 15, 4, 14, 9, 6, 10, 12, 5, 12, 8, 8, 12,15)
> psycho_test
[1] 13 14  7 12 10  6  8 15  4 14  9  6 10 12  5 12  8  8 12 15
> hist(psycho_test)

最後のコマンドを実行するとこんな画像が表示される:

f:id:sirocco634:20110212222746p:image

Rによるやさしい統計学

Rによるやさしい統計学