国連投票データセット

ケーススタディ：Rで行う探索的データ分析

Dave Robinson

Chief Data Scientist, DataCamp

国連投票データセット

rcid	session	vote	ccode
46	2	1	2
46	2	1	20
46	2	9	31
46	2	1	40
46	2	1	41
46	2	1	42
46	2	1	51
46	2	9	52
46	2	9	53

¹ Erik Voeten, "Data and Analyses of Voting in the UN General Assembly"

国連投票データセット

rcid	session	vote	ccode
46	2	1	2	各行は国と投票のペア
46	2	1	20
46	2	9	31
46	2	1	40
46	2	1	41
46	2	1	42
46	2	1	51
46	2	9	52
46	2	9	53

¹ Erik Voeten, "Data and Analyses of Voting in the UN General Assembly"

国連投票データセット

rcid	session	vote	ccode
46	2	1	2	各行は国と投票のペア
46	2	1	20
46	2	9	31	rcid = 「点呼ID」
46	2	1	40
46	2	1	41
46	2	1	42
46	2	1	51
46	2	9	52
46	2	9	53

¹ Erik Voeten, "Data and Analyses of Voting in the UN General Assembly"

国連投票データセット

rcid	session	vote	ccode
46	2	1	2	各行は国と投票のペア
46	2	1	20
46	2	9	31	rcid = 点呼ID
46	2	1	40
46	2	1	41	session = 会期年
46	2	1	42
46	2	1	51
46	2	9	52
46	2	9	53

¹ Erik Voeten, "Data and Analyses of Voting in the UN General Assembly"

国連投票データセット

rcid	session	vote	ccode
46	2	1	2	各行は国と投票のペア
46	2	1	20
46	2	9	31	rcid = 点呼ID
46	2	1	40
46	2	1	41	session = 会期年
46	2	1	42
46	2	1	51	vote = 投票コード
46	2	9	52
46	2	9	53

¹ Erik Voeten, "Data and Analyses of Voting in the UN General Assembly"

国連投票データセット

rcid	session	vote	ccode
46	2	1	2	各行は国と投票のペア
46	2	1	20
46	2	9	31	rcid = 点呼ID
46	2	1	40
46	2	1	41	session = 会期年
46	2	1	42
46	2	1	51	vote = 投票コード
46	2	9	52
46	2	9	53	ccode = 国コード

¹ Erik Voeten, "Data and Analyses of Voting in the UN General Assembly"

dplyrでのvotes

# Load dplyr package
library(dplyr)
votes

# A tibble: 508,929 × 4
    rcid session  vote ccode
   <dbl>   <dbl> <dbl> <int>
1     46       2     1     2
2     46       2     1    20
3     46       2     9    31
4     46       2     1    40
5     46       2     1    41
6     46       2     1    42
7     46       2     9    51
8     46       2     9    52
9     46       2     9    53
10    46       2     9    54
# ... with 508,919 more rows

変数名

パイプ演算子

1-1.014.png

パイプ演算子

1-1.015.png

dplyrの動詞

1-1.018.png

dplyrの動詞

1-1.020.png

元データ

votes

# A tibble: 508,929 × 4
    rcid session  vote ccode
   <dbl>   <dbl> <dbl> <int>
1     46       2     1     2
2     46       2     1    20
3     46       2     9    31
4     46       2     1    40
5     46       2     1    41
6     46       2     1    42
7     46       2     9    51
8     46       2     9    52
9     46       2     9    53
10    46       2     9    54
# ... with 508,919 more rows

1 = 賛成
2 = 棄権
3 = 反対
8 = 欠席
9 = 非加盟

dplyrの動詞: filter

filter は条件に合う行を残す

votes %>%
  filter(vote <= 3)

# A tibble: 353,547 × 4
    rcid session  vote ccode
   <dbl>   <dbl> <dbl> <int>
1     46       2     1     2
2     46       2     1    20
3     46       2     1    40
4     46       2     1    41
5     46       2     1    42
6     46       2     1    70
7     46       2     1    90
8     46       2     1    91
9     46       2     1    92
10    46       2     1    93
# ... with 508,919 more rows

dplyrの動詞: mutate

mutate は列を追加する

votes %>%
  mutate(year = session + 1945)

# A tibble: 508,929 × 5
    rcid session  vote ccode  year
   <dbl>   <dbl> <dbl> <int> <dbl>
1     46       2     1     2  1947
2     46       2     1    20  1947
3     46       2     9    31  1947
4     46       2     1    40  1947
5     46       2     1    41  1947
6     46       2     1    42  1947
7     46       2     9    51  1947
8     46       2     9    52  1947
9     46       2     9    53  1947
10    46       2     9    54  1947
# ... with 508,919 more rows

データクリーニングの連結処理

1-1.033.png

演習に進みましょう！

ケーススタディ：Rで行う探索的データ分析

Preparing Video For Download...