/hongkongio

Twitter IO in Hong Kong

Primary LanguageRGNU General Public License v3.0GPL-3.0

{hongkongio}

This package contain the data of an information operation targeting the situation in Hong Kong. The data are described here: Information operations directed at Hong Kong.

Installation

# install.packages("remotes")
remotes::install_github("knapply/hongkongio")

Data

library(hongkongio)
library(dplyr)

hkio_users_df %>% # single data set
  glimpse()
#> Observations: 940
#> Variables: 10
#> $ user_id            <chr> "vMm2zemFOF7kmXoDyX24Bo+TorqhNutpZlATYyxsE=...
#> $ name               <chr> "vMm2zemFOF7kmXoDyX24Bo+TorqhNutpZlATYyxsE=...
#> $ screen_name        <chr> "vMm2zemFOF7kmXoDyX24Bo+TorqhNutpZlATYyxsE=...
#> $ location           <chr> NA, NA, NA, NA, NA, "California, USA", NA, ...
#> $ description        <chr> NA, NA, NA, NA, NA, "cool", NA, NA, NA, NA,...
#> $ profile_url        <chr> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,...
#> $ followers_count    <int> 1, 0, 23949, 17, 0, 17116, 0, 1, 2, 12, 0, ...
#> $ following_count    <int> 52, 0, 52, 34, 0, 76, 39, 46, 127, 64, 0, 3...
#> $ account_created_at <date> 2017-08-30, 2017-10-16, 2016-06-27, 2016-0...
#> $ account_lang       <chr> "zh-cn", "zh-cn", "zh-cn", "es", "zh-tw", "...
hkio_all_tweets() %>% # combine the 9 `data.table`s of tweets
  glimpse()
#> Observations: 3,614,907
#> Variables: 31
#> $ status_id          <chr> "436306424587890688", "582682975969624064",...
#> $ user_id            <chr> "206027550", "206027550", "206027550", "206...
#> $ name               <chr> "The Flecha", "The Flecha", "The Flecha", "...
#> $ screen_name        <chr> "nessniven", "nessniven", "nessniven", "nes...
#> $ location           <chr> "Republic of Korea", "Republic of Korea", "...
#> $ description        <chr> "When you see Jair Bolsonaro and his progra...
#> $ profile_url        <chr> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,...
#> $ followers_count    <int> 100847, 100847, 100847, 100847, 100847, 100...
#> $ following_count    <int> 31752, 31752, 31752, 31752, 31752, 31752, 3...
#> $ account_created_at <date> 2010-10-22, 2010-10-22, 2010-10-22, 2010-1...
#> $ account_lang       <chr> "en", "en", "en", "en", "en", "en", "en", "...
#> $ lang               <chr> "pt", "pt", "pt", "pt", NA, "pt", "pt", "pt...
#> $ text               <chr> "segui o @instagranzin e ganhei 89 seguidor...
#> $ created_at         <dttm> 2014-02-20, 2015-03-30, 2015-03-31, 2015-0...
#> $ source             <chr> "TweetDeck", "TweetDeck", "TweetDeck", "Twe...
#> $ reply_to_user_id   <chr> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,...
#> $ reply_to_status_id <chr> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,...
#> $ quoted_status_id   <chr> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,...
#> $ is_retweet         <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, F...
#> $ retweet_user_id    <chr> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,...
#> $ retweet_status_id  <chr> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,...
#> $ latitude           <chr> "absent", "absent", "absent", "absent", "ab...
#> $ longitude          <chr> "absent", "absent", "absent", "absent", "ab...
#> $ quote_count        <int> 0, 0, 0, 0, 0, 0, 0, 0, 9, 0, 0, 0, 0, 0, 0...
#> $ reply_count        <int> 0, 0, 0, 0, 0, 0, 0, 0, 18, 1, 1, 1, 1, 0, ...
#> $ like_count         <int> 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0...
#> $ retweet_count      <int> 0, 52, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, ...
#> $ hashtags           <list> [NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, N...
#> $ urls_url           <list> [NA, "http://goo.gl/32K38q", NA, "http://g...
#> $ mentions_user_id   <list> ["443196382", NA, "116351908", NA, NA, NA,...
#> $ poll_choices       <chr> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA,...