🔨 Tools to Work with the 'webhose.io' 'API' in R
Switch branches/tags
Nothing to show
Clone or download

README.md

webhose

Tools to Work with the 'webhose.io' 'API'

Description

The 'webhose.io' https://webhose.io/about 'API' provides access to structured web data feeds across vertical content domains. Their crawlers download the web, structure the data and index save it into domain-specific repositories that can be accessed on demand. Methods are provided to query and retrieve content from this 'API'.

TODO

Cover the rest of the wehbose.io API.

Covered are

What's in the tin?

The following functions are implemented:

  • filter_posts: Retrieve structured posts data from news articles, blog posts and online discussions
  • fetch_posts: Fetch all structured posts data from news articles, blog posts and online discussions
  • filter_reviews: Retrieve structured reviews data from hundreds of review sites
  • fetch_reviews: Fetch all structured reviews data from hundreds of review sites

Installation

devtools::install_github("hrbrmstr/webhose")

Usage

library(webhose)

# current verison
packageVersion("webhose")
## [1] '0.1.0'

Make just one call and/or handle API pagination on your own:

res <- filter_posts("(China AND United) language:english site_type:news site:bloomberg.com", ts = 1213456)

str(res)
## List of 5
##  $ posts               :'data.frame':    100 obs. of  42 variables:
##   ..$ uuid                             : chr [1:100] "ea6f6084be16a50b0d4791ffa268956ca691c16d" "bd0ac60981ac73e2a7e71378881272eb5b6147d7" "3f2c2c13aa2b3c6d5fc8300f3a9876d9c86c08d1" "659d73d3ddba3c0a0505da8fc15862bc33ac9519" ...
##   ..$ url                              : chr [1:100] "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlgeKUSTNIqEofP1vmWYU0gcWSaL9Q_eyN8poyAr9ZMQdbU2SkzlF5VBNP"| __truncated__ "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlgeKUdAw0RVFi4HjhBpliRRp4dSGOkv.5MII1x88FLOLdKwoKluBX2nlV"| __truncated__ "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlgeKUSTNIqEofP1VpVuiHLlUCVrZmAe5YWU_Mnf2esMYybfs5E2VTmJDN"| __truncated__ "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlgeKUSTNIqEofP14ZdJZRy9AXSnEw_RdLi7DJ.872mE2k8ZYCgXdZs19t"| __truncated__ ...
##   ..$ ord_in_thread                    : int [1:100] 0 0 0 0 0 0 0 0 0 0 ...
##   ..$ author                           : chr [1:100] "More stories by Andy Sharp" "" "More Stories Kanga Kong" "More stories by Margaret Talev" ...
##   ..$ published                        : chr [1:100] "2017-09-03T14:59:00.000+03:00" "2017-09-03T11:15:00.000+03:00" "2017-09-03T06:59:00.000+03:00" "2017-09-20T03:20:00.000+03:00" ...
##   ..$ title                            : chr [1:100] "With Powerful Nuclear Bomb, Kim Dares Trump and Xi to Stop Him" "https://www.bloomberg.com:443/news/articles/2017-07-31/chinese-money-pouring-into-malaysia-could-help-najib-razak-with-votes?cm"| __truncated__ "North Korea Quake Seems Related to Nuclear Test, Says Yonhap - Bloomberg" "Trump Bluntly Threatens to Wipe Out North Korea in His UN Debut" ...
##   ..$ text                             : chr [1:100] "In detonating North Korea’s most powerful nuclear bomb yet, Kim Jong Un is betting it’s too late for either U.S. President Dona"| __truncated__ "China funds going to projects like port, roads, bridges Malaysia says it is balancing its relationship with China Why Chinese M"| __truncated__ "President Donald Trump threatened to increase economic sanctions and halt trade with any nation doing business with North Korea"| __truncated__ "Follow @bpolitics for all the latest news, and sign up for our daily Balance of Power newsletter.\nPresident Donald Trump’s war"| __truncated__ ...
##   ..$ highlightText                    : chr [1:100] "late for either U.S. President Donald Trump or <em>Chinese</em> leader Xi Jinping to be able to take away his atomic... issues."| __truncated__ "<em>China</em> funds going to projects like port, roads, bridges Malaysia says it is balancing its relationship... relationship"| __truncated__ "outlined plans for new sanctions that would target <em>China</em>, which still has commercial ties with North Korea... we have "| __truncated__ "reference to its leader as “Rocket Man” in his <em>United</em> Nations speech -- were defended by aides as making... on North K"| __truncated__ ...
##   ..$ highlightTitle                   : chr [1:100] "" "" "" "" ...
##   ..$ language                         : chr [1:100] "english" "english" "english" "english" ...
##   ..$ external_links                   :List of 100
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:7] "http://www.reuters.com/article/us-northkorea-usa-oil/how-north-korea-gets-its-oil-from-china-lifeline-in-question-at-u-n-meetin"| __truncated__ "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iK8DGcQ5nh4A/v1/60x-1.png" "http://fingfx.thomsonreuters.com/gfx/rngs/NORTHKOREA-SANCTIONS/010040Y120K/index.html" "http://www.un.org/apps/news/story.asp?NewsID=57456#.WazOaLIjEUE" ...
##   .. ..$ : chr [1:3] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ixmeJCgwyaHc/v0/60x-1.png" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ixmeJCgwyaHc/v0/-1x-1.png" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ixmeJCgwyaHc/v0/460x260.png"
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:8] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ixuqL7e.P7DM/v0/60x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ixuqL7e.P7DM/v0/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iQe13PO.xXXU/v6/460x260.png" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iQe13PO.xXXU/v6/-1x-1.png" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:2] "https://securedrop.ap.org/" "https://twitter.com/ekinetz"
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:7] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ikHWTFQJsPWI/v2/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ikHWTFQJsPWI/v2/60x-1.jpg" "https://twitter.com/bpolitics" "https://www.facebook.com/bloombergpolitics" ...
##   .. ..$ : chr [1:11] "https://www.project-syndicate.org/commentary/north-korea-nuclear-program-invasion-by-christopher-r-hill-2017-06" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ihJDxcpjFGVM/v2/-1x-1.png" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iw0lHR_V1rIM/v3/-1x-1.jpg" "http://opinion.huanqiu.com/editorial/2017-08/11110392.html" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:6] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ifLvWS_ycsY4/v0/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ip0f76XcO6Go/v1/60x-1.png" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iwvTSNygJmug/v0/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ip0f76XcO6Go/v1/-1x-1.png" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:11] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/i_64m0hvZPDA/v2/60x-1.png" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iSZEhHXG9_R8/v2/-1x-1.png" "https://www.state.gov/t/avc/rls/rpt/wmeat/2016/index.htm" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iSZEhHXG9_R8/v2/60x-1.png" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:5] "https://www.iif.com/publication/global-macro-views/global-macro-views-bottom-explanation-low-inflation-us" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iApCW2cQfHyc/v5/60x-1.png" "http://www.nber.org/papers/w23805" "http://www.nber.org/papers/w23782" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:6] "https://ofaclawyer.net/economic-sanctions-programs/" "http://www.fmprc.gov.cn/mfa_eng/xwfw_665399/s2510_665401/2511_665403/t1474637.shtml" "https://piie.com/blogs/north-korea-witness-transformation/sanctions-things-are-about-get-interesting-really" "http://www.38north.org/author/joseph-dethomas/" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:2] "http://sciencebasedtargets.org/" "http://rhg.com/wp-content/uploads/2017/05/RHG_ENR_Taking_Stock_24May2017.pdf"
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:11] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iDH1MPF9NcPw/v2/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ifSr6mGePL3k/v2/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ifVwnbZdz4bQ/v2/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iRBEg_2i5Gt8/v2/60x-1.jpg" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:4] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ibgkR2r3PwPI/v3/60x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iELcJdEgU5bU/v4/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iELcJdEgU5bU/v4/60x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ibgkR2r3PwPI/v3/-1x-1.jpg"
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:7] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/io2dzFQZhUt4/v1/60x-1.png" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/i4SoY9LZ3PGs/v1/-1x-1.png" "https://www.iaea.org/newscenter/statements/iaea-director-general-opening-remarks-at-panel-discussion-on-global-nuclear-governan"| __truncated__ "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iUYfKTWq2f9Y/v1/60x-1.png" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:3] "https://twitter.com/realDonaldTrump" "http://link.mail.bloombergbusiness.com/join/4wm/markets-signup&hash=b9b2681361bede0e1069ca238efb1ec2" "https://www.wired.com/story/nasas-cassini-saturn-mission-finally-faces-its-fiery-doom/"
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:8] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/i8yaytOUjS7I/v5/740x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/i8yaytOUjS7I/v5/680x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/i8yaytOUjS7I/v5/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ivcPZ48tctUw/v2/-1x-1.png" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. ..$ : chr [1:6] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iPyJhAKr.3w0/v1/60x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iPyJhAKr.3w0/v1/-1x-1.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/in7lRXRplSAs/v0/60x-1.png" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/in7lRXRplSAs/v0/-1x-1.png" ...
##   .. ..$ : chr(0) 
##   .. ..$ : chr(0) 
##   .. .. [list output truncated]
##   ..$ rating                           : logi [1:100] NA NA NA NA NA NA ...
##   ..$ crawled                          : chr [1:100] "2017-09-03T15:48:39.001+03:00" "2017-09-03T06:26:25.003+03:00" "2017-09-03T07:13:16.004+03:00" "2017-09-19T23:07:33.001+03:00" ...
##   ..$ thread.uuid                      : chr [1:100] "ea6f6084be16a50b0d4791ffa268956ca691c16d" "bd0ac60981ac73e2a7e71378881272eb5b6147d7" "3f2c2c13aa2b3c6d5fc8300f3a9876d9c86c08d1" "659d73d3ddba3c0a0505da8fc15862bc33ac9519" ...
##   ..$ thread.url                       : chr [1:100] "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlgeKUSTNIqEofP1vmWYU0gcWSaL9Q_eyN8poyAr9ZMQdbU2SkzlF5VBNP"| __truncated__ "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlgeKUdAw0RVFi4HjhBpliRRp4dSGOkv.5MII1x88FLOLdKwoKluBX2nlV"| __truncated__ "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlgeKUSTNIqEofP1VpVuiHLlUCVrZmAe5YWU_Mnf2esMYybfs5E2VTmJDN"| __truncated__ "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlgeKUSTNIqEofP14ZdJZRy9AXSnEw_RdLi7DJ.872mE2k8ZYCgXdZs19t"| __truncated__ ...
##   ..$ thread.site_full                 : chr [1:100] "www.bloomberg.com" "www.bloomberg.com" "www.bloomberg.com" "www.bloomberg.com" ...
##   ..$ thread.site                      : chr [1:100] "bloomberg.com" "bloomberg.com" "bloomberg.com" "bloomberg.com" ...
##   ..$ thread.site_section              : chr [1:100] "https://www.bloomberg.com/politics" "http://www.businessinsider.com/clusterstock/thehive.rss" "" "https://www.bloomberg.com/politics/feeds/site.xml" ...
##   ..$ thread.site_categories           :List of 100
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "media" "tech"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. ..$ : chr [1:2] "news" "business"
##   .. .. [list output truncated]
##   ..$ thread.section_title             : chr [1:100] "Politics - Bloomberg" "The Hive" "" "Bloomberg Politics" ...
##   ..$ thread.title                     : chr [1:100] "With Powerful Nuclear Bomb, Kim Dares Trump and Xi to Stop Him" "https://www.bloomberg.com:443/news/articles/2017-07-31/chinese-money-pouring-into-malaysia-could-help-najib-razak-with-votes?cm"| __truncated__ "North Korea Quake Seems Related to Nuclear Test, Says Yonhap - Bloomberg" "Trump Bluntly Threatens to Wipe Out North Korea in His UN Debut" ...
##   ..$ thread.title_full                : chr [1:100] "With Powerful Nuclear Bomb, Kim Dares Trump and Xi to Stop Him - Bloomberg" "https://www.bloomberg.com:443/news/articles/2017-07-31/chinese-money-pouring-into-malaysia-could-help-najib-razak-with-votes?cm"| __truncated__ "North Korea Quake Seems Related to Nuclear Test, Says Yonhap - Bloomberg" "Trump Bluntly Threatens to Wipe Out North Korea in His UN Debut - Bloomberg" ...
##   ..$ thread.published                 : chr [1:100] "2017-09-03T14:59:00.000+03:00" "2017-09-03T11:15:00.000+03:00" "2017-09-03T06:59:00.000+03:00" "2017-09-20T03:20:00.000+03:00" ...
##   ..$ thread.replies_count             : int [1:100] 0 0 0 0 0 0 0 0 0 0 ...
##   ..$ thread.participants_count        : int [1:100] 1 0 0 1 0 0 0 0 1 0 ...
##   ..$ thread.site_type                 : chr [1:100] "news" "news" "news" "news" ...
##   ..$ thread.country                   : chr [1:100] "US" "US" "US" "US" ...
##   ..$ thread.spam_score                : num [1:100] 0 0 0.23 0 0.22 0.682 0.753 0 0.001 0.031 ...
##   ..$ thread.main_image                : chr [1:100] "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/i4tvtAlvLqUU/v0/1200x800.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/i5bC6m0W8mPU/v1/1200x801.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/iKZKH1hax1Ic/v0/1200x389.jpg" "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/ioMNIRTllvX0/v0/1200x800.jpg" ...
##   ..$ thread.performance_score         : int [1:100] 10 10 10 10 10 10 10 10 10 10 ...
##   ..$ thread.domain_rank               : int [1:100] 356 356 356 356 356 356 356 356 356 356 ...
##   ..$ thread.social.facebook.likes     : int [1:100] 1574 6852 2922 1079 1215 1755 5638 4179 1825 1138 ...
##   ..$ thread.social.facebook.comments  : int [1:100] 0 0 0 0 0 0 0 0 0 0 ...
##   ..$ thread.social.facebook.shares    : int [1:100] 1574 6852 2922 1079 1612 1755 5638 4179 1825 1138 ...
##   ..$ thread.social.gplus.shares       : int [1:100] 0 0 0 0 0 0 0 0 0 0 ...
##   ..$ thread.social.pinterest.shares   : int [1:100] 8 2 1 0 0 0 0 4 0 0 ...
##   ..$ thread.social.linkedin.shares    : int [1:100] 87 763 323 7 86 45 6 560 24 3 ...
##   ..$ thread.social.stumbledupon.shares: int [1:100] 0 0 0 0 0 0 0 0 0 0 ...
##   ..$ thread.social.vk.shares          : int [1:100] 0 0 2 0 0 0 0 2 0 0 ...
##   ..$ entities.persons                 :List of 100
##   .. ..$ :'data.frame':  20 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:20] "kim jong un" "kim dares trump" "xi jinping" "lankov" ...
##   .. .. ..$ sentiment: chr [1:20] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  20 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:20] "xi jinping" "sanjit das/bloomberg  najib" "sanjit das/bloomberg  harrison cheng" "isham ishak" ...
##   .. .. ..$ sentiment: chr [1:20] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  2 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:2] "kim jong" "kim jong un"
##   .. .. ..$ sentiment: chr [1:2] "none" "none"
##   .. ..$ :'data.frame':  18 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:18] "trump" "donald trump" "xi jinping" "angela merkel" ...
##   .. .. ..$ sentiment: chr [1:18] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "trump" "pena nieto" "xi jinping" "enrique pena nieto" ...
##   .. .. ..$ sentiment: chr [1:12] "neutral" "neutral" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "donald trump" "kim jong un" "mike pence" "kim" ...
##   .. .. ..$ sentiment: chr [1:5] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  2 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:2] "ju" "trump"
##   .. .. ..$ sentiment: chr [1:2] "negative" "none"
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "trump" "north k" "donald trump" "ri yong ho" ...
##   .. .. ..$ sentiment: chr [1:15] "negative" "negative" "negative" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "philip gray" "donald trump" "nicholas eberstadt" "kim jong un" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  22 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:22] "trump" "eric talmadge" "xi jinping" "moon jae-in" ...
##   .. .. ..$ sentiment: chr [1:22] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  18 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:18] "xi jinping" "shinhye kang" "geng shuang" "kambiz foroohar" ...
##   .. .. ..$ sentiment: chr [1:18] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "missi" "moon jae-in" "donald trump" "moon" ...
##   .. .. ..$ sentiment: chr [1:16] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  17 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:17] "moon jae-in" "lopez" "geng shuang" "haley" ...
##   .. .. ..$ sentiment: chr [1:17] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "kim jong" "haley" "donald trump" "richard gowan" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  3 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:3] "lee nak-yon" "kena betancur/afp" "kim"
##   .. .. ..$ sentiment: chr [1:3] "none" "none" "none"
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "kim jong" "shinzo abe" "yoshihide suga" "kim jong un" ...
##   .. .. ..$ sentiment: chr [1:5] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "chines" "jack ma" "donald trump" "steven mnuchin" ...
##   .. .. ..$ sentiment: chr [1:6] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "putin" "vladimir putin" "kena bentancur/afp" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "ri yong ho" "donald trump" "richard nixon" "h.r. mcmaster" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "putin" "natalya kaspersky" "vladimir putin" "edward snowden" ...
##   .. .. ..$ sentiment: chr [1:9] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "u." "ri yong ho" "white" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:9] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "fitzgerald" "mccain" "tobin harshaw" "brooks" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  46 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:46] "grassley" "meyer" "mark elletson" "kushner" ...
##   .. .. ..$ sentiment: chr [1:46] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "coinhako" "yusho liu" "zeall" "chia hock lai" ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "xi jinping" "james mayger" "donald trump" "keith zhai" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "donald trump" "kim jong" "ri yong ho" "mckinney" ...
##   .. .. ..$ sentiment: chr [1:11] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "kim jong un" "kim jong" "shinzo abe" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:6] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "jia qingguo" "bonnie glaser" "bruce bennett" "kim jong" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  22 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:22] "jessica alba" "ntokozo" "emma watson" "hubert reeves" ...
##   .. .. ..$ sentiment: chr [1:22] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "putin" "xi jinping" "moon jae-in" "vladimir putin" ...
##   .. .. ..$ sentiment: chr [1:11] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "moon jae-in" "donald trump" "kim jong un" "kim" ...
##   .. .. ..$ sentiment: chr [1:5] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  17 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:17] "haley" "nikki haley" "xi jinping" "sabah al-ahmed al-sabah" ...
##   .. .. ..$ sentiment: chr [1:17] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "donald trump" "shinzo abe" "toluse olorunnipa" "nick wadhams" ...
##   .. .. ..$ sentiment: chr [1:8] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "ri yong ho" "xi jinping" "nikki haley" "kim jong un" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "ivanka trump" "donald trump" "richard painter" "abigail klem" ...
##   .. .. ..$ sentiment: chr [1:15] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "francesca levy" "oskar levander" "levander" "justin bachman" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  23 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:23] "trump" "bloomberg trump" "moon jae-in" "mark dubowitz" ...
##   .. .. ..$ sentiment: chr [1:23] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "justin trudeau" "alain bellemare" "freeland" "michael sasso" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "bannon" "xi jinping" "gary cohn" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:14] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "shinzo abe" "kim jong" "moon jae-in" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:8] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "shinzo abe" "kim jong" "moon jae-in" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:8] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "xi jinping" "piao zhongzhe" "zhao tong" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "kim" "britta pedersen/dpa" "kim jong" "tomohiro ohsumi/bloomberg sign" ...
##   .. .. ..$ sentiment: chr [1:14] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  1 obs. of  2 variables:
##   .. .. ..$ name     : chr "shuping niu"
##   .. .. ..$ sentiment: chr "none"
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "curry" "erik fairbairn" "fairbairn" "brian parkin" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "mnuchin" "geng shuang" "kambiz foroohar" "kim jong" ...
##   .. .. ..$ sentiment: chr [1:14] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  1 obs. of  2 variables:
##   .. .. ..$ name     : chr "steven mnuchin"
##   .. .. ..$ sentiment: chr "none"
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "moon jae-in" "donald trump" "moon" "yue qiu" ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "putin says trump" "russi" "vladimir putin" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:6] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "hassan rouhani" "barack obama" "donald trump" "rex tillerson" ...
##   .. .. ..$ sentiment: chr [1:8] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  25 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:25] "sam" "ronald reagan" "donald trump" "obama" ...
##   .. .. ..$ sentiment: chr [1:25] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "hassan rouhani" "barack obama" "dina esfandiary" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "theresa may" "shinzo abe" "andy palmer" "johnson" ...
##   .. .. ..$ sentiment: chr [1:13] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "nicholas bloom" "zucman" "moore" "gabriel zucman"
##   .. .. ..$ sentiment: chr [1:4] "none" "none" "none" "none"
##   .. ..$ :'data.frame':  18 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:18] "aibing guo" "buhari" "sophie mongalvy" "zhang" ...
##   .. .. ..$ sentiment: chr [1:18] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "lu kang" "miao han" "kim jong un" "lu" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "henry ford" "deena shanker  america" "maryn mckenna" "david cameron" ...
##   .. .. ..$ sentiment: chr [1:13] "negative" "neutral" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "deng xiaoping" "kim jong-un" "deng" "timothy lavin" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "donald trump" "rex tillerson" "vipin narang" "kim jong un" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "barack obama" "donald trump" "obama" "kim jong un" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "barack obama" "agnel philip" "joseph dethomas" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "trump" "john kerry" "brown" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:8] "neutral" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "xi jinping" "sabah al-ahmed al-sabah" "kambiz foroohar" "joseph dunford" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "trump" "john kerry" "brown" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:8] "neutral" "none" "none" "none" ...
##   .. ..$ :'data.frame':  18 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:18] "trump" "donald trump" "james slack" "margaret talev" ...
##   .. .. ..$ sentiment: chr [1:18] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  30 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:30] "manafort" "donald trump" "techcorp" "georgios georgiou" ...
##   .. .. ..$ sentiment: chr [1:30] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "kim jong-un" "rex tillerson" "cui" "cui tiankai" ...
##   .. .. ..$ sentiment: chr [1:5] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "moon jae-in" "dianne feinstein" "susan decker" "haley" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  3 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:3] "rex tillerson" "donald trump" "feifei shen"
##   .. .. ..$ sentiment: chr [1:3] "none" "none" "none"
##   .. ..$ :'data.frame':  25 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:25] "donald trump" "kim" "moon jae-in" "angela merkel" ...
##   .. .. ..$ sentiment: chr [1:25] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "lorcan roche kelly  want" "william dudley" "bill" "theresa may" ...
##   .. .. ..$ sentiment: chr [1:5] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "putin" "merkel" "donald trump" "xi jinping" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "negative" "negative" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "moon jae-in" "donald trump" "david shipley" "michael newman" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "kim jong" "wang lisheng" "donald trump" "shi haiyan" ...
##   .. .. ..$ sentiment: chr [1:15] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "kim jong un - bloomberg  the north" "chung sung-jun/getty im" "kim jong" "byk" ...
##   .. .. ..$ sentiment: chr [1:10] "neutral" "neutral" "none" "none" ...
##   .. ..$ :'data.frame':  19 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:19] "sun zeshun" "xi jinping" "liu ligang" "zhu rongji" ...
##   .. .. ..$ sentiment: chr [1:19] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "hunt" "channing phillips" "mingzheng" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  24 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:24] "secreta" "max baucus" "rex tillerson" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:24] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "justin trudeau" "jack ma" "donald trump" "greg quinn" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "yukiya amano" "andreas persbo" "haley" "donald trump" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "donald trump" "nikki haley" "jean-yves le drian" "trump"
##   .. .. ..$ sentiment: chr [1:4] "none" "none" "none" "none"
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "hugh hendry" "tillerson" "donald trump" "kim jong un" ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "andrey rudakov/bloomberg" "kerssemakers" "lex kerssemakers" "li shufu"
##   .. .. ..$ sentiment: chr [1:4] "none" "none" "none" "none"
##   .. ..$ :'data.frame':  25 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:25] "trump" "new yor" "haley" "eduardo munoz" ...
##   .. .. ..$ sentiment: chr [1:25] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "johanna chua" "robert brand" "bill dudley" "mario draghi" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "rex tillerson" "mario svirsky" "bradley klapper" "ben fox" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "barack obama" "kevin" "mark dubowitz" "philip gray" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "bloomberg merkel" "stanley fischer" "merkel" "angela merkel" ...
##   .. .. ..$ sentiment: chr [1:12] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  19 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:19] "sune stralberg" "fredrik bjorkenwall" "bjorkis hundprodukter" "dan lundstrom" ...
##   .. .. ..$ sentiment: chr [1:19] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  21 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:21] "martin shkreli" "matt levine  juicero" "michael lewis" "merrill" ...
##   .. .. ..$ sentiment: chr [1:21] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  3 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:3] "okun" "steve okun" "trump"
##   .. .. ..$ sentiment: chr [1:3] "none" "none" "none"
##   .. .. [list output truncated]
##   ..$ entities.organizations           :List of 100
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "washington post" "asan institute for policy studies" "massachusetts institute of technology" "brics" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "institute of strategic and international studies malaysia" "ming dynasty" "united malays national organisation" "dbs" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "afp" "yonhap - bloomberg" "bloomberg terminal" "yonhap news"
##   .. .. ..$ sentiment: chr [1:4] "negative" "negative" "none" "none"
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "united nations general assembly" "united nations" "general assembly" "fox news" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "un security council votes" "bloomberg bloomberg" "demo request bloomberg connecting" "bloomberg"
##   .. .. ..$ sentiment: chr [1:4] "negative" "negative" "none" "none"
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "bloomberg how trump" "nafta" "council of the americas" "brics" ...
##   .. .. ..$ sentiment: chr [1:15] "neutral" "neutral" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "bloomberg mexico" "united nations security council" "security council" "bloomberg" ...
##   .. .. ..$ sentiment: chr [1:7] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  2 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:2] "nhk" "bloomberg terminal"
##   .. .. ..$ sentiment: chr [1:2] "none" "none"
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "institute for the study of war" "senate armed services committee" "united nations" "pentagon" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "bloomberg trump" "american enterprise institute" "congressional" "united nations" ...
##   .. .. ..$ sentiment: chr [1:8] "neutral" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "bloomberg trump" "state" "associated press" "bloomberg terminal" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "yonhap" "thaad" "thaad" "security council" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  18 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:18] "getty images" "nuclear information project" "kyodo news" "kcna" ...
##   .. .. ..$ sentiment: chr [1:18] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "bloomberg china" "united nations security council" "un sanctions cut" "peking university" ...
##   .. .. ..$ sentiment: chr [1:12] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  18 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:18] "un security council votes" "bloomberg un" "n. korea sanctions will cut deep  follow" "financial times" ...
##   .. .. ..$ sentiment: chr [1:18] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "united nations security council" "un" "dprk" "korean central news agency" ...
##   .. .. ..$ sentiment: chr [1:5] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "united nations" "un" "security council" "un security council" ...
##   .. .. ..$ sentiment: chr [1:5] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "korea asia-pacific peace committee" "bloomberg terminal" "korean central news agency" "workers’ party"
##   .. .. ..$ sentiment: chr [1:4] "none" "none" "none" "none"
##   .. ..$ :'data.frame':  23 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:23] "commerce department" "inseego corp." "white house" "canyon bridge capital partners llc" ...
##   .. .. ..$ sentiment: chr [1:23] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "bloomberg putin" "brics" "united nations" "bloomberg terminal" ...
##   .. .. ..$ sentiment: chr [1:6] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "bloomberg quint" "bloomberg" "institute for the study of war" "army" ...
##   .. .. ..$ sentiment: chr [1:15] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "bloomberg taiga" "google" "infowatch" "gazprom pjsc" ...
##   .. .. ..$ sentiment: chr [1:11] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "washington post" "u.n" "dprk" "united nations" ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "un" "united nations security council" "security council" "u.s. pacific fleet" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  30 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:30] "bloomberg share" "congress" "cnn" "brandlin & associates" ...
##   .. .. ..$ sentiment: chr [1:30] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "singapore cryptocurrency firms facing bank account closures - bloomberg singapore cryptocurrency firms facing bank" "dbs" "oversea-chinese banking corp." "blockchain industry association" ...
##   .. .. ..$ sentiment: chr [1:13] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "brics" "security council" "citigroup" "u.s. energy information administration" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "yonhap" "army" "warhead progress south korea’s unification ministry" "united nations general assembly" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  2 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:2] "kcna" "korean central news agency"
##   .. .. ..$ sentiment: chr [1:2] "none" "none"
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "bloomberg" "washington post" "csis" "united nations" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  21 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:21] "unilever" "bloomberg" "financial times" "capri sun" ...
##   .. .. ..$ sentiment: chr [1:21] "neutral" "neutral" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "bloomberg moon" "united nations security council" "getty images  south" "bloomberg terminal" ...
##   .. .. ..$ sentiment: chr [1:6] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "un" "united nations security council" "washington post" "nuclear weapons institute" ...
##   .. .. ..$ sentiment: chr [1:9] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "united nations" "congress" "security council" "bloomberg" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  2 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:2] "cnn" "united nations general assembly"
##   .. .. ..$ sentiment: chr [1:2] "none" "none"
##   .. ..$ :'data.frame':  19 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:19] "trump" "bloomberg quint" "bloomberg" "ricoh india begin much" ...
##   .. .. ..$ sentiment: chr [1:19] "negative" "negative" "negative" "negative" ...
##   .. ..$ :'data.frame':  28 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:28] "ap" "congress" "adidas ag" "importgenius" ...
##   .. .. ..$ sentiment: chr [1:28] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  27 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:27] "rolls-royce marine power operations ltd." "flirtey inc." "staples inc." "cowen & co." ...
##   .. .. ..$ sentiment: chr [1:27] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "congress" "united nations" "foundation for defense of democracies" "un security council" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  23 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:23] "bombardier" "delta" "boeing" "siemens ag" ...
##   .. .. ..$ sentiment: chr [1:23] "negative" "negative" "negative" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "bloomberg trump" "congress" "breitbart news" "united nations" ...
##   .. .. ..$ sentiment: chr [1:14] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  1 obs. of  2 variables:
##   .. .. ..$ name     : chr "un"
##   .. .. ..$ sentiment: chr "none"
##   .. ..$ :'data.frame':  1 obs. of  2 variables:
##   .. .. ..$ name     : chr "un"
##   .. .. ..$ sentiment: chr "none"
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "bloomberg businessweek residents" "bloomberg businessweek" "world trade organization" "liaoning academy of social sciences" ...
##   .. .. ..$ sentiment: chr [1:15] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "united nations" "global headlines london underground" "bloomberg politics" "state" ...
##   .. .. ..$ sentiment: chr [1:9] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "bloomberg news" "un’s food & agriculture organization" "united nations" "bloomberg terminal"
##   .. .. ..$ sentiment: chr [1:4] "negative" "none" "none" "none"
##   .. ..$ :'data.frame':  25 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:25] "audi ag" "engie sa" "audi" "united nations" ...
##   .. .. ..$ sentiment: chr [1:25] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  17 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:17] "treasury" "bloomberg mnuchin threatens financial sanctions" "security council" "united nations" ...
##   .. .. ..$ sentiment: chr [1:17] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "treasury department" "central bank of democratic people’s republic of korea" "un security council resolutions" "foreign trade bank of the democratic people’s republic of korea" ...
##   .. .. ..$ sentiment: chr [1:5] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  2 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:2] "u.s. state department" "national assembly budget office"
##   .. .. ..$ sentiment: chr [1:2] "none" "none"
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "bloomberg putin says trump" "brics" "united nations" "bloomberg terminal" ...
##   .. .. ..$ sentiment: chr [1:5] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "congress" "security council" "united nations general assembly" "state" ...
##   .. .. ..$ sentiment: chr [1:5] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  24 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:24] "bloomberg military uncle sam wants" "congress" "naval postgraduate school" "boeing" ...
##   .. .. ..$ sentiment: chr [1:24] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "congress" "security council" "united nations general assembly" "atlantic council" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "eu" "bbc radio" "confederation of british industry" "daily telegraph" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "stanford university" "nber" "iif" "the institute of international finance" ...
##   .. .. ..$ sentiment: chr [1:5] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "sec" "sinopec" "doj" "justice department" ...
##   .. .. ..$ sentiment: chr [1:16] "negative" "negative" "negative" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "bloomberg china imports" "bloomberg news dprk" "united nations security council" "security council" ...
##   .. .. ..$ sentiment: chr [1:9] "neutral" "neutral" "none" "none" ...
##   .. ..$ :'data.frame':  27 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:27] "bloomberg" "lederle laboratories" "fda" "new york times" ...
##   .. .. ..$ sentiment: chr [1:27] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  2 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:2] "united nations" "bloomberg lp"
##   .. .. ..$ sentiment: chr [1:2] "none" "none"
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "trump" "united nations" "getty images" "thaad" ...
##   .. .. ..$ sentiment: chr [1:15] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "bloomberg" "peterson institute for international economics" "united nations" "un" ...
##   .. .. ..$ sentiment: chr [1:6] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "peterson institute for international economics" "pennsylvania state university" "united nations" "un" ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "united technologies corp." "united nations general assembly" "nike inc." "merck & co" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "trump" "bloomberg trump" "congress" "security council" ...
##   .. .. ..$ sentiment: chr [1:9] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "united technologies corp." "united nations general assembly" "nike inc." "merck & co" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "bloomberg" "congress" "state" "general assembly" ...
##   .. .. ..$ sentiment: chr [1:8] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "washington post" "black sea cable" "techcorp universal" "s&p global markets" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  3 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:3] "united nations security council" "state" "un security council"
##   .. .. ..$ sentiment: chr [1:3] "none" "none" "none"
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "tillerson vows `peaceful pressure campaign' against north korea" "security council" "cnn" "abc" ...
##   .. .. ..$ sentiment: chr [1:10] "neutral" "none" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "un sanctions china" "ministry of commerce" "state" "un" ...
##   .. .. ..$ sentiment: chr [1:5] "neutral" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "united nations security council" "congress" "anti-corruption action center" "bloomberg politics" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "bloomberg" "new york fed" "house of commons" "european union" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "trump" "united nations general assembly" "big un" "un" ...
##   .. .. ..$ sentiment: chr [1:7] "negative" "negative" "negative" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "bloomberg" "bloomberg view" "treasury department" "existing united nations" ...
##   .. .. ..$ sentiment: chr [1:7] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "getty images at dong sheng" "commerce ministry" "bloomberg" "united nations" ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "party" "united nations" "bloomberg lp" "seoul national university"
##   .. .. ..$ sentiment: chr [1:4] "none" "none" "none" "none"
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "jiangsu meiyang ecological farming & forestry co." "changan" "u.s. department of agriculture’s economic research service" "bloomberg businessweek" ...
##   .. .. ..$ sentiment: chr [1:15] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "bloomberg this chinese company" "commerce department" "mingzheng international trading limited" "united nations" ...
##   .. .. ..$ sentiment: chr [1:15] "neutral" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "us-korea institute" "state" "united nations" "un" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "globalization global" "bloomberg global business forum" "united nations general assembly" "alibaba group holding" ...
##   .. .. ..$ sentiment: chr [1:5] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "trump iran" "american enterprise institute" "iaea" "united nations" ...
##   .. .. ..$ sentiment: chr [1:7] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "balance of power" "congress" "security council" "bloomberg" ...
##   .. .. ..$ sentiment: chr [1:10] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "cassini" "bloomberg intelligence" "united nation" "pc partner group ltd." ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "volvo" "bloomberg volvo" "volvo cars" "zhejiang geely holding group co." ...
##   .. .. ..$ sentiment: chr [1:7] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  18 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:18] "un ‘club" "bloomberg un ‘club" "congress" "security council" ...
##   .. .. ..$ sentiment: chr [1:18] "neutral" "neutral" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "security council" "european central bank" "fed" "ecb" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "the associated press" "technische universitaet dortmund" "new york university school of medicine" "medstar georgetown university hospital" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "congress" "american enterprise institute" "european union" "united nations" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "kiwi dollar" "national party" "eu" "european central bank" ...
##   .. .. ..$ sentiment: chr [1:13] "negative" "negative" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "swedish mining town - bloomberg" "nature" "lkab" "ica ab" ...
##   .. .. ..$ sentiment: chr [1:14] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  28 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:28] "bloomberg" "nba record" "regulatory reporting" "united technologies" ...
##   .. .. ..$ sentiment: chr [1:28] "negative" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "bloomberg southeast asia looks likely" "american chamber of commerce" "amcham" "bloomberg terminal" ...
##   .. .. ..$ sentiment: chr [1:8] "negative" "none" "none" "none" ...
##   .. .. [list output truncated]
##   ..$ entities.locations               :List of 100
##   .. ..$ :'data.frame':  19 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:19] "north korea" "japan" "russia" "india" ...
##   .. .. ..$ sentiment: chr [1:19] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  23 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:23] "china" "malaysia" "south china sea" "singapore" ...
##   .. .. ..$ sentiment: chr [1:23] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "getty images north korea" "north korea" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  17 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:17] "north korea" "new york" "south china sea" "united states" ...
##   .. .. ..$ sentiment: chr [1:17] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  1 obs. of  2 variables:
##   .. .. ..$ name     : chr "north korea"
##   .. .. ..$ sentiment: chr "none"
##   .. ..$ :'data.frame':  20 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:20] "china" "mexico" "argentina" "united states" ...
##   .. .. ..$ sentiment: chr [1:20] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "u.s." "mexico" "south korea" "japan" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "japan toward pacific ocean" "north korea" "japan" "pacific ocean"
##   .. .. ..$ sentiment: chr [1:4] "none" "none" "none" "none"
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "u.s." "north korea" "china" "korean peninsula" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "north korea" "south china sea" "japan" "beijing" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  22 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:22] "north korea" "atherine lucey" "koreas" "united states" ...
##   .. .. ..$ sentiment: chr [1:22] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "south korea" "bloomberg south korea" "beijing" "u.s." ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "seoul" "bloomberg south korea paves way" "south korea paves way" "thaad" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "beijing" "russia warn the u.s." "china" "moscow" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "north korea" "u.s.-south korea" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "north korea warns u.s." "north korea" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "north korea" "getty images while pyongyang" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "japan" "bloomberg north korea" "north korea" "south korea" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "beijing" "oregon" "u.s." "portland" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "u.s." "north korea" "getty images  u.s." "china" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "u.s." "north korea" "new york" "united states" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "u.s." "china" "siberia" "ukraine" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "bloomberg north korea" "north korea" "new york" "south korea" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  25 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:25] "north korea" "sea of japan" "nampo" "haiti" ...
##   .. .. ..$ sentiment: chr [1:25] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  44 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:44] "u.s." "vermont" "disneyland" "singapore" ...
##   .. .. ..$ sentiment: chr [1:44] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  4 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:4] "southeast asia" "singapore" "china" "cryptocurrency investments  singapore"
##   .. .. ..$ sentiment: chr [1:4] "none" "none" "none" "none"
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "china" "japan" "north korea" "ponghwa" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "u.s." "yonhap says north korea" "new york" "south korea" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "japan" "south korea" "u.s." "okinawa" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "u.s." "north korea taboo china" "united states" "balkans" ...
##   .. .. ..$ sentiment: chr [1:15] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  21 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:21] "chicago" "europe" "japan" "africa" ...
##   .. .. ..$ sentiment: chr [1:21] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "north korea" "u.s." "tokyo" "china" ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "bloomberg north korea" "north korea" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "u.s." "north korea says u.s." "north korea" "china" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "north korea" "new york" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "u.s." "north korea" "eu" "new york" ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "shanghai" "china" "new york" "hong kong" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  34 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:34] "vancouver" "beaver creek" "englewood" "singapore" ...
##   .. .. ..$ sentiment: chr [1:34] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "north korea belie limits" "north korea" "beijing" "south korea" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "u.s." "canada" "united states" "china" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "china" "south korea" "u.s." "hong kong" ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "north korea" "u.s." "japan" "china" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "north korea" "u.s." "japan" "china" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "china along china" "north korea" "new york" "liaoning" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "japan" "north korea" "myanmar" "aung san suu kyi" ...
##   .. .. ..$ sentiment: chr [1:15] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "bloomberg north korea" "north korea" "u.s." "hong kong" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "davos" "west texas" "bonn" "china" ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  9 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:9] "china" "north korea" "new york" "u.s." ...
##   .. .. ..$ sentiment: chr [1:9] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "u.s." "north korea" "china" "united arab emirates" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "south korea" "north korea" "koreas" "japan" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "u.s." "ukraine  putin" "san francisco" "china" ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "u.s." "iran" "middle east" "new york" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  35 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:35] "afghanistan" "eastern europe" "libya" "kabul" ...
##   .. .. ..$ sentiment: chr [1:35] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "u.s." "iran" "middle east" "new york" ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "japan" "eu" "brussels" "asia" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  19 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:19] "argentina" "hong kong" "europe" "gulf" ...
##   .. .. ..$ sentiment: chr [1:19] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  16 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:16] "u.s." "nigeria" "new york" "hong kong" ...
##   .. .. ..$ sentiment: chr [1:16] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  3 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:3] "china" "north korea  china" "north korea"
##   .. .. ..$ sentiment: chr [1:3] "none" "none" "none"
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "saudi arabia" "u.s." "seattle" "china" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "bloomberg north korea" "north korea" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "north korea" "south korea" "u.s." "iran" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "u.s." "north korea" "iran" "china" ...
##   .. .. ..$ sentiment: chr [1:5] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "u.s." "north korea" "iran" "china" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "u.s." "new york" "puerto rico" "china" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "north korea" "demilitarized zone" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "u.s." "new york" "puerto rico" "china" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "u.s." "iran" "new york" "united states" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  21 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:21] "rusal" "cyprus" "hungary" "eastern europe" ...
##   .. .. ..$ sentiment: chr [1:21] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "u.s." "north korea china" "china" "north korea" ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  7 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:7] "u.s." "united states" "china" "california" ...
##   .. .. ..$ sentiment: chr [1:7] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  3 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:3] "china" "u.s." "north korea"
##   .. .. ..$ sentiment: chr [1:3] "none" "none" "none"
##   .. ..$ :'data.frame':  19 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:19] "beijing" "u.s." "north korea" "berlin" ...
##   .. .. ..$ sentiment: chr [1:19] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "florida keys" "united states" "japan" "europe" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  2 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:2] "new york" "china"
##   .. .. ..$ sentiment: chr [1:2] "none" "none"
##   .. ..$ :'data.frame':  6 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:6] "u.s." "north korea" "beijing" "south korea" ...
##   .. .. ..$ sentiment: chr [1:6] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  22 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:22] "yalu river" "china" "yellow sea" "sea of japan" ...
##   .. .. ..$ sentiment: chr [1:22] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "south korea" "u.s." "japan" "china" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "china" "jiangsu" "beijing" "shiji" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "u.s." "u.s. target north korea" "north korea" "beijing" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  12 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:12] "u.s." "japan" "north korea" "south korea" ...
##   .. .. ..$ sentiment: chr [1:12] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  5 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:5] "new york" "u.s." "china" "america" ...
##   .. .. ..$ sentiment: chr [1:5] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "iran" "united states" "libya" "washington" ...
##   .. .. ..$ sentiment: chr [1:15] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "u.s." "iran" "persian gulf" "islamic republic" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  14 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:14] "north korea" "japan" "europe" "england" ...
##   .. .. ..$ sentiment: chr [1:14] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  10 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:10] "billion south carolina plant" "billion south carolina" "charleston" "americas" ...
##   .. .. ..$ sentiment: chr [1:10] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  20 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:20] "new york" "myanmar" "south sudan" "japan" ...
##   .. .. ..$ sentiment: chr [1:20] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "asia" "korea" "south korea" "u.s." ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  18 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:18] "cuba" "u.s." "united states" "moscow" ...
##   .. .. ..$ sentiment: chr [1:18] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  13 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:13] "iran" "new york" "afghanistan" "russia" ...
##   .. .. ..$ sentiment: chr [1:13] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  15 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:15] "germany new zealand" "brussels" "hong kong" "chicago" ...
##   .. .. ..$ sentiment: chr [1:15] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  20 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:20] "hibbing" "new york" "tallangatta" "kiruna" ...
##   .. .. ..$ sentiment: chr [1:20] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  0 obs. of  0 variables
##   .. ..$ :'data.frame':  8 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:8] "juicero" "staten island" "sapporo" "china" ...
##   .. .. ..$ sentiment: chr [1:8] "none" "none" "none" "none" ...
##   .. ..$ :'data.frame':  11 obs. of  2 variables:
##   .. .. ..$ name     : chr [1:11] "u.s." "southeast asia" "vietnam" "singapore" ...
##   .. .. ..$ sentiment: chr [1:11] "none" "none" "none" "none" ...
##   .. .. [list output truncated]
##  $ totalResults        : int 220
##  $ moreResultsAvailable: int 120
##  $ next                : chr "/filterWebContent?token=c927f1c8-bd9c-4863-8338-fa88c14ce6b8&format=json&ts=1213456&q=%28China+AND+United%29+language%3Aenglish"| __truncated__
##  $ requestsLeft        : int 867

Auto-handle pagination (NOTE: you're more likelky to rip through your plan API credits this way):

res <- fetch_posts("(China AND United) language:english site_type:news site:bloomberg.com",ts = 1213456)

dplyr::glimpse(res)
## Observations: 220
## Variables: 42
## $ uuid                              <chr> "ea6f6084be16a50b0d4791ffa268956ca691c16d", "bd0ac60981ac73e2a7e713788812...
## $ url                               <chr> "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlg...
## $ ord_in_thread                     <int> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0...
## $ author                            <chr> "More stories by Andy Sharp", "", "More Stories Kanga Kong", "", "More St...
## $ published                         <chr> "2017-09-03T14:59:00.000+03:00", "2017-09-03T11:15:00.000+03:00", "2017-0...
## $ title                             <chr> "With Powerful Nuclear Bomb, Kim Dares Trump and Xi to Stop Him", "https:...
## $ text                              <chr> "In detonating North Korea’s most powerful nuclear bomb yet, Kim Jong Un ...
## $ highlighttext                     <chr> "late for either U.S. President Donald Trump or <em>Chinese</em> leader X...
## $ highlighttitle                    <chr> "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "...
## $ language                          <chr> "english", "english", "english", "english", "english", "english", "englis...
## $ external_links                    <list> [<>, <>, <>, <>, <>, <>, <>, <>, <>, <>, <>, <>, <>, <>, <>, <>, <>, <>,...
## $ rating                            <lgl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, N...
## $ crawled                           <chr> "2017-09-03T15:48:39.001+03:00", "2017-09-03T06:26:25.003+03:00", "2017-0...
## $ thread_uuid                       <chr> "ea6f6084be16a50b0d4791ffa268956ca691c16d", "bd0ac60981ac73e2a7e713788812...
## $ thread_url                        <chr> "http://omgili.com/ri/.wHSUbtEfZQ2wVwv1GOz6Msy5xK737ZFABw8Ekw2S.t5sWsmdlg...
## $ thread_site_full                  <chr> "www.bloomberg.com", "www.bloomberg.com", "www.bloomberg.com", "www.bloom...
## $ thread_site                       <chr> "bloomberg.com", "bloomberg.com", "bloomberg.com", "bloomberg.com", "bloo...
## $ thread_site_section               <chr> "https://www.bloomberg.com/politics", "http://www.businessinsider.com/clu...
## $ thread_site_categories            <list> [<"news", "business">, <"news", "business">, <"news", "business">, <"new...
## $ thread_section_title              <chr> "Politics - Bloomberg", "The Hive", "", "", "", "Bloomberg Politics", "",...
## $ thread_title                      <chr> "With Powerful Nuclear Bomb, Kim Dares Trump and Xi to Stop Him", "https:...
## $ thread_title_full                 <chr> "With Powerful Nuclear Bomb, Kim Dares Trump and Xi to Stop Him - Bloombe...
## $ thread_published                  <chr> "2017-09-03T14:59:00.000+03:00", "2017-09-03T11:15:00.000+03:00", "2017-0...
## $ thread_replies_count              <int> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0...
## $ thread_participants_count         <int> 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0...
## $ thread_site_type                  <chr> "news", "news", "news", "news", "news", "news", "news", "news", "news", "...
## $ thread_country                    <chr> "US", "US", "US", "US", "US", "US", "US", "US", "US", "US", "US", "US", "...
## $ thread_spam_score                 <dbl> 0.000, 0.000, 0.230, 0.220, 0.753, 0.000, 0.682, 0.000, 0.001, 0.052, 0.0...
## $ thread_main_image                 <chr> "https://assets.bwbx.io/images/users/iqjWHBFdfxIU/i4tvtAlvLqUU/v0/1200x80...
## $ thread_performance_score          <int> 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 9, 10, 10, 10, 10, 10, 10...
## $ thread_domain_rank                <int> 356, 356, 356, 356, 356, 356, 356, 356, 356, 356, 356, 356, 356, 356, 356...
## $ thread_social_facebook_likes      <int> 1574, 6852, 2922, 1215, 5638, 1079, 1755, 4179, 1825, 2922, 1120, 1337, 9...
## $ thread_social_facebook_comments   <int> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0...
## $ thread_social_facebook_shares     <int> 1574, 6852, 2922, 1612, 5638, 1079, 1755, 4179, 1825, 2938, 1120, 1337, 9...
## $ thread_social_gplus_shares        <int> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0...
## $ thread_social_pinterest_shares    <int> 8, 2, 1, 0, 0, 0, 0, 4, 0, 0, 0, 5, 3, 0, 3, 0, 5, 1, 1, 1, 0, 0, 0, 2, 0...
## $ thread_social_linkedin_shares     <int> 87, 763, 323, 86, 6, 7, 45, 560, 24, 0, 8, 101, 118, 3, 46, 16, 62, 12, 6...
## $ thread_social_stumbledupon_shares <int> 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0...
## $ thread_social_vk_shares           <int> 0, 0, 2, 0, 0, 0, 0, 2, 0, 0, 0, 4, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 4...
## $ entities_persons                  <list> [<c("kim jong un", "kim dares trump", "xi jinping", "lankov", "donald tr...
## $ entities_organizations            <list> [<c("washington post", "asan institute for policy studies", "massachuset...
## $ entities_locations                <list> [<c("north korea", "japan", "russia", "india", "beijing", "south korea",...