일단 이 글은 R markdown으로 쓰여졌다는 것을 미리 명시한다.
개인적인 의문에의해 분석해본 데이터로서 각 정당별 트위터를 대략적으로 어떤 방식으로 사용하고 있는지 확인해 보려 하는 목적이 있다.
다분히 정치적 의도 때문이 아니라 개인적인 관심에 의한 분석이라는 것을 이 글을 보시는 분들이 명심해 주셨으면 한다.
문서는 앞으로 계속 업데이트 될 것이다.
먼저 아래의 데이터는 19대 국회의원 중에서 트위터를 가지고 있는 의원을 중심으로 수집한 데이터이다. 필드 설명은 이름, 트위터 계정, 정당명, 팔로워수, 트윗수 순이다.
트위터 데이터 수집 일자는 2012.06.10일이다.
물론 아래 데이터에는 빠진 의원이 있을 수 있다.
#데이터 로드
load("polititions.RData")
#필드명
names(polititions)
## [1] "name" "twitter" "party" "followersCount"
## [5] "statusesCount"
polititions
## name twitter party followersCount statusesCount
## 1 권성동 @ksdd22 새누리 5338 169
## 2 김성태 @kimsungtae 새누리 14440 963
## 3 김세연 @seyeonkim72 새누리 3263 2080
## 4 김영우 @kim_youngwoo 새누리 9206 391
## 5 김용태 @ytnetwork 새누리 4425 1042
## 6 김태원 @kim_taewon 새누리 14120 682
## 7 김태환 @Gumi_Kimtw 새누리 7659 101
## 8 나성린 @na_sl 새누리 10345 329
## 9 남경필 @yesKP 새누리 18722 1148
## 10 박근혜 @GH_PARK 새누리 199397 168
## 11 서병수 @sbs8680 새누리 10551 815
## 12 송광호 @songkh21 새누리 1219 2
## 13 신성범 @sbumshin 새누리 8738 15
## 14 안홍준 @masanjun 새누리 8270 985
## 15 여상규 @sky435 새누리 4504 81
## 16 원유철 @won6767 새누리 5232 146
## 17 유일호 @ilhoYoo 새누리 7174 696
## 18 유정복 @you_zzang 새누리 3 0
## 19 윤상현 @sanghyun_yoon 새누리 14538 549
## 20 윤진식 @yoon_jinsik 새누리 2810 466
## 21 이군현 @koonhyon 새누리 2369 126
## 22 이병석 @leebyungsuk 새누리 11625 1061
## 23 이재오 @JaeOhYi 새누리 39065 2613
## 24 이주영 @newmasan 새누리 2318 55
## 25 이진복 @JinBok57 새누리 4861 486
## 26 이철우 @CUagainLee 새누리 3253 444
## 27 이학재 @hjv6465 새누리 10916 302
## 28 이한성 @lee_han_sung 새누리 7747 430
## 29 정갑윤 @kyjung2206 새누리 1096 59
## 30 정두언 @doorun 새누리 24739 1167
## 31 정몽준 @globalmj 새누리 3803 353
## 32 정병국 @withbg 새누리 13548 1613
## 33 정의화 @JusticeHwa 새누리 3051 992
## 34 정희수 @jhs01000 새누리 15694 198
## 35 조원진 @cho_wonjin 새누리 3866 148
## 36 주호영 @sangtoil 새누리 7549 92
## 37 진영 @ChinYoung 새누리 11271 312
## 38 최경환 @khwanchoi 새누리 15205 1139
## 39 한선교 @hansunkyo 새누리 5521 81
## 40 홍일표 @hongip 새누리 20093 539
## 41 황영철 @hhhyc 새누리 2125 11
## 42 황우여 @hwangwygrace 새누리 6383 378
## 43 강기정 @gijungkang 민주통합 7483 684
## 44 김동철 @kdc2000 민주통합 10683 282
## 45 김상희 @SosaKim 민주통합 4140 681
## 46 김성곤 @kimsgnet 민주통합 3383 314
## 47 김영환 @kyh21 민주통합 11309 4257
## 48 김재윤 @kimJaeyun 민주통합 3802 119
## 49 김진표 @jinpyokim 민주통합 11950 2292
## 50 박주선 @ParkJooSun 자유선진 18355 1188
## 51 박지원 @jwp615 민주통합 74516 5116
## 52 백재현 @jhok100 민주통합 4005 704
## 53 변재일 @BYUNJAEILL 민주통합 2013 257
## 54 안민석 @minstwit 민주통합 1 3
## 55 양승조 @yangsim012 민주통합 2185 377
## 56 오제세 @ojs0126 민주통합 1089 5
## 57 우윤근 @2020GG 민주통합 1425 100
## 58 원혜영 @wonhyeyoung 민주통합 23256 3394
## 59 이낙연 @nylee21 민주통합 6477 424
## 60 이미경 @lmk2014 민주통합 14080 990
## 61 이석현 @lsh4u 민주통합 22811 1808
## 62 이용섭 @yongsuplee 민주통합 23632 455
## 63 이윤석 @Lee_Yoon_Seok 민주통합 542 40
## 64 이종걸 @leejongkul 민주통합 36409 1629
## 65 장병완 @cbwhope 민주통합 1433 152
## 66 전병헌 @BHJun 민주통합 46731 6555
## 67 정세균 @sk0926 민주통합 22438 2745
## 68 조경태 @Choforce 민주통합 8120 1455
## 69 주승용 @joo350 민주통합 2120 256
## 70 최재성 @withjs21 민주통합 8353 1575
## 71 추미애 @choomiae 민주통합 37241 843
## 72 홍영표 @youngpyoHong 민주통합 4133 1001
## 73 이상민 @esangmin 민주통합 2035 2502
## 74 이인제 @powerIJ 자유선진 8514 541
## 75 이정현 @lee_junghyun 새누리 8121 227
## 76 황우여 @hwangwygrace 새누리 6383 378
## 77 이정희 @heenews 통합진보 221734 10124
## 78 강기갑 @kanggigap 통합진보 84369 4777
## 79 심상정 @sangjungsim 통합진보 195590 4476
## 80 노회찬 @hcroh 통합진보 229727 13676
## 81 유시민 @u_simin 통합진보 470601 1037
## 82 한명숙 @HanMyeongSook 민주통합 190268 604
## 83 이상규 @whitefireg 통합진보 13392 7500
## 84 김미희 @snkmh 통합진보 1837 548
## 85 오병윤 @oby518 통합진보 3362 1101
## 86 강동원 @kdwon53 통합진보 2003 368
## 87 김선동 @sundongv 통합진보 20878 1216
## 88 윤금순 @yoongeumsoon 통합진보 2036 656
## 89 이석기 @bluesky21sk 통합진보 1513 26
## 90 김재연 @opentree20 통합진보 9951 752
## 91 김제남 @jenam63 통합진보 64 16
## 92 박원석 @wspark 통합진보 6315 996
## 93 이인제 @powerij 자유선진 8514 541
## 94 이명수 @asanworld 자유선진 4647 1400
## 95 성완종 @sungwoanjong 자유선진 1289 164
## 96 문정림 @doucemoon 자유선진 360 72
## 97 김영주 @yjkim550727 자유선진 3021 316
## 98 유성엽 @yousuoy 자유선진 1343 738
## 99 김한표 @khp1001 자유선진 705 45
summary(polititions)
## name twitter party followersCount
## 이인제 : 2 Length:99 민주통합:31 Min. : 1
## 황우여 : 2 Class :character 새누리 :44 1st Qu.: 2916
## 강기갑 : 1 Mode :character 자유선진: 9 Median : 7483
## 강기정 : 1 통합진보:15 Mean : 25038
## 강동원 : 1 3rd Qu.: 14280
## 권성동 : 1 Max. :470601
## (Other):91
## statusesCount
## Min. : 0
## 1st Qu.: 168
## Median : 541
## Mean : 1191
## 3rd Qu.: 1120
## Max. :13676
##
정당별 트위터 팔로워와 트윗수와의 관계를 그려보면 아래와 같다.
library(ggplot2)
ggplot(polititions, aes(followersCount, statusesCount)) + geom_point(aes(colour = party),
size = 3, alpha = I(0.7)) + facet_grid(. ~ party)
트윗수가 많지 않음에도 팔로워가 많은 의원들이 누군지는 짐작이 가리라 생각한다.
텍스트를 표현해 보면 아래와 같다.
ggplot(polititions, aes(followersCount, statusesCount)) + geom_point(aes(colour = party),
size = 3, alpha = I(0.7)) + geom_text(aes(label = name, colour = party),
angle = 30, size = 4, vjust = -1, hjust = 0.2) + facet_grid(. ~ party)
한명숙, 박근혜, 유시민의 경우 그다지 트위터를 하지 않아도 고정적인 팬들이 있는 정치인으로 그닥 트위터에 신경쓰지 않아도 될 분들이라 생각된다.
하지만 트윗수가 많음에도 그닥 팔로워들이 붙지 않는 분들은 왜 그런지 고민이 필요할 거라 생각된다.
데이터 특징은 아래와 같다.
to be updated~~~