联合国投票数据集

案例研究：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，"联合国大会投票的数据与分析"

联合国投票数据集

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，"联合国大会投票的数据与分析"

联合国投票数据集

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，"联合国大会投票的数据与分析"

联合国投票数据集

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，"联合国大会投票的数据与分析"

联合国投票数据集

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，"联合国大会投票的数据与分析"

联合国投票数据集

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，"联合国大会投票的数据与分析"

在 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 = Yes
2 = Abstain
3 = No
8 = Not present
9 = Not a member

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

Passons à la pratique !

案例研究：R 中的探索性数据分析