프로그래밍/데이터분석

R Studio를 통해 트위터 데이터 가져오기(2)

&+&& 2017. 4. 10. 18:30

  지난번 글(링크)에서 데이터를 가져오기 위한 트위터 설정은 마쳤으니 이번에는 R Studio에서의 작업과 읽어온 데이터만 확인하면 됩니다. 혹시나 R Studio를 설치 안 하신 경우에는 먼저 R Studio를 설치해 줍니다.(링크R Studio를 실행해 줍니다.




  1.  필요 패키지 설치

 - R Studio 우측 하단 부의 Packages 선택 후 Install 선택

 - [Install Pakages] 팝업창에서 중간 [Packages]란에 [twitterR] 입력 후 [Install]

 - 위와 같은 방법으로 [base64enc], [ROAuth] 설치

  - 설치가 진행되는 동안 Console창에는 위와 같은 메시지들이 표시가 됩니다.

  - Console창에 [ > install.packages("twitteR") ] 이런 식으로 명령을 직접 입력해서 설치해도 됩니다.


  2.  R Script 작성

 - File -> New File -> R Script 선택하여 새로운 스크립트 파일 생성 후 아래 소스 코드 입력


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
library(twitteR)
library(base64enc)
library(ROAuth)
#library(RCurl)                   이전 버전
 
#request_token_URL= "https://api.twitter.com/oauth/request_token"   이전 버전
#authrize_URL ="https://api.twitter.com/oauth/authorize"            이전 버전
#access_token_URL= "https://api.twitter.com/oauth/access_token"     이전 버전
 
consumer_key <- '키값'
consumer_secret <- '키값'
access_token <- '키값'
access_secret <- '키값'
 
setup_twitter_oauth(consumer_key,consumer_secret,access_token,access_secret)
cs

  ※ '키값'으로 표시된 부분에는 twitter app 생성 시에 확인해 두었던 키값을 입력


  - 정상적으로 실행이 된 경우 위와 같은 메시지가 console 란에 표시


  3.  tweet 데이터 불러오기 및 확인

 - 스크립트에 아래 내용 입력 후 실행(삼성에게 쓰여진 tweet 200개 로딩)

 > samsung.tweets <- searchTwitter("@samsungtomorrow", n = 200)

 - 로딩된 변수 창에서 데이터 로딩 여부 확인 또는 명령어 입력을 통해 확인

 > samsung.tweets

  - 정상적으로 완료되었다면 list 형으로 samsung.tweets가 생성된 것을 environment -> values에서 확인 가능합니다.


  갤럭시 S8이 출시된 지 얼마 되지 않아서 신제품에 대한 피드백을 기대하고 삼성에게 보내진 트위터를 다운로드했는데, 데이터를 보니 온통 정치 이야기네요.