[R] 구글 트렌드를 이용한 조국 검색 결과

구글 트렌드 자료는 아래와 같이 정의된다. 구글에 검색 요청이 들어왔던 자료를 정규화 시켜 놓은 것이다.

FAQ about Google Trends data

Google Trends provides access to a largely unfiltered sample of actual search requests made to Google. It’s anonymized (no one is personally identified), categorized (determining the topic for a search query) and aggregated (grouped together). This allows us to display interest in a particular topic from around the globe or down to city-level geography.

R에서는 gtrendsR 패키지를 이용하여 구글 트렌드 자료를 얻을 수 있다. 먼저 패키지를 로딩한다(없으면 패키지를 설치하라).

검색어로 일단 "조국"을 넣어보았다. 검색 지역은 한국으로 한정하였다(국가 코드를 검색하여 넣었다). 검색기간은 오늘부터 3개월 전까지로 한정하였다.

library(gtrendsR)
search_terms <- c("조국")
output_results <- gtrends(keyword = search_terms,
                          geo = "KR",
                          time = "today 3-m") 

 

이렇게 불러들여진 자료는 아래와 같이 ggplot을 이용하여 살펴보았다. 

output_results %>% 
  .$interest_over_time %>% 
  ggplot(aes(x = as.Date(date) , y = as.numeric(hits))) +
  geom_area(fill = "lightblue", alpha = 0.8) +
  geom_line(color = "lightblue") +
  scale_x_date(date_labels = "%b %d",
               breaks = "1 week") +
  labs(
    x = "date",
    y = "hits",
    title = "Google Trends for Cho"
  ) +
  theme_minimal()

아래와 같은 그림을 얻었다.

검색 히트수가 높은 시점은 주 단위로 보면 3개의 지점이다.

8월 19일주: 딸 조민에 대한 의혹이 제기되기 시작한 시점이다. 조민 포르쉐 등이 등장했다. 자유한국당이 고발한 시점이기도 하다.

9월 2일주: 이때는 사모펀드 관련하여 정경심의 한투 PB가 부정적인 진술을 한다고 보도되던 시기이다. 이번 조국대전의 결정적인 순간이 아니었나 싶다. 그런 점에서 KBS의 PB 인터뷰가 중요한 모멘트가 될 수도 있었겠다.

10월 14일주: 조국 사퇴시점이다.