8.6 KiB
用 R 收集和映射推特数据的初学者向导
学习使用 R's twitteR 和 leaflet 包, 你就可以把任何话题的推文定位画在地图上。
Image by :
琼斯·贝克. CC BY-SA 4.0. 来源: Cloud, Globe. Both CC0.
当我开始学习 R ，出于研究的目的我也需要学习如何收集推特数据并对其进行映射。尽管网上关于这个话题的信息很多，但我发觉难以理解什么与收集并映射推特数据相关。我不仅是个 R 新手，而且对不同教程中技术关系不熟悉。尽管困难重重，我成功了！在这个教程里，我将以一种新手程序员都能看懂的方式攻略如何收集推特数据并将至展现在地图中。
程序设计和开发
创建应用程序
如果你没有推特帐号，首先你需要 注册一个.然后, 到 apps.twitter.com 创建一个允许你收集推特数据应用程序。别担心，创建应用程序极其简单。你创建的应用程序会与推特应用程序接口（API）相连。 想象 API 是一个多功能电子个人助手。你可以使用 API 让其他程序帮你做事。这样一来，你可以接入推特 API 令其收集数据。只需确保不要请求太多，因为推特数据请求次数是有限制 的。
收集推文有两个可用的 API 。你若想做一次性的推文收集，那么使用 REST API. 若是想在特定时间内持续收集，可以用 streaming API。教程中我主要使用 REST API.
创建应用程序之后，前往 Keys and Access Tokens 标签。你需要 Consumer Key (API key), Consumer Secret (API secret), Access Token, 和 Access Token Secret 来在 R 中访问你的应用程序。
收集推特数据
下一步是打开 R 准备写代码。对于初学者，我推荐使用 RStudio, R 的集成开发环境 (IDE) 。我发现 RStudio 在解决问题和测试代码时很实用。 R 有访问 REST API 的包叫 twitteR.
打开 RStudio 并新建 RScript。做好这些之后，你需要安装和加载 twitteR 包:
install.packages("twitteR")
#installs TwitteR
library (twitteR)
#loads TwitteR
安装并载入 twitteR 包之后，你得输入上文提及的应用程序的 API 信息：
api_key <- ""
#in the quotes, put your API key
api_secret <- ""
#in the quotes, put your API secret token
token <- ""
#in the quotes, put your token
token_secret <- ""
#in the quotes, put your token secret
接下来，连接推特访问 API:
setup_twitter_oauth(api_key, api_secret, token, token_secret)
我们来试试有关社区花园和农夫市场的推特研究：
tweets <- searchTwitter("community garden OR #communitygarden OR farmers market OR #farmersmarket", n = 200, lang = "en")
代码意思是搜索前200篇 **(n = 200)**英文 **(lang = "en")**推文, 包括关键词 community garden 或 farmers market或任何提及这些关键词的话题标签。
推特搜索完成之后，在数据框中保存你的结果：
tweets.df <-twListToDF(tweets)
为了用推文创建地图，你需要收集的导出为 .csv 文件:
write.csv(tweets.df, "C:\Users\YourName\Documents\ApptoMap\tweets.csv")
#an example of a file extension of the folder in which you want to save the .csv file.
运行前确保 R 代码已保存然后继续进行下一步。.
生成地图
现在你有了可以展示在地图上的数据。在此教程中，我们将用一个 R 包 Leaflet做一个基本的应用程序，一个热门 JavaScript 库做交互式地图。 Leaflet 使用 magrittr 管道运算符 (%>%), 使得它易于写代码因为语法更加自然。刚接触可能有点奇怪，但它确实降低了写代码的工作量。
为了清晰度，在 RStudio 打开一个新的 R 脚本安装这些包：
install.packages("leaflet")
install.packages("maps")
library(leaflet)
library(maps)
现在需要一个路径让 Leaflet 访问你的数据：
read.csv("C:\Users\YourName\Documents\ApptoMap\tweets.csv", stringsAsFactors = FALSE)
stringAsFactors = FALSE 意思是保留信息，不将它转化成 factors. (想了解 factors,读这篇文章"stringsAsFactors: An unauthorized biography", by Roger Peng.)
是时候制作你的 Leaflet 地图了。你将使用 OpenStreetMap基本地图来做你的地图：
m <- leaflet(mymap) %>% addTiles()
我们来给基本地图加个范围。对于 lng 和 lat, 添加列名包括推文的经纬度，前面加个**~**。 ~longitude 和 ~latitude 在你的 .csv 文件中与列名相关的：
m %>% addCircles(lng = ~longitude, lat = ~latitude, popup = mymap$type, weight = 8, radius = 40, color = "#fb3004", stroke = TRUE, fillOpacity = 0.8)
运行你的代码。一个网页浏览器将会弹出并展示你的地图。这是我前面收集的推文的地图：
leafletmap.jpg
用定位、 Leaflet 和 OpenStreetMap 的推文地图, CC-BY-SA
虽然你可能会对地图上的图文数量如此之小感到惊奇，典型地，只有1%的推文被地理编码了。我收集了总数为366的推文，但只有10（大概总推文的3%）是被地理编码了的。如果为能得到地理编码过的推文困扰，改变搜索关键词看看能不能得到更好的结果。
总结
对于初学者，把所有碎片结合起来去从推特数据生成一个 Leaflet 地图可能很艰难。 这个教程基于我完成这个任务的经验，我希望它能让你的学习过程变得更轻松。
Dorris Scott 将会在研讨会上提出这个话题, 从应用程序到地图: 用 R 收集映射社会媒体数据, at the We Rise Women in Tech Conference (#WeRiseTech) 六月 23-24 在亚特兰大。
作者简介：
Dorris Scott - Dorris Scott 是佐治亚大学的地理学博士生。她的研究重心是地理信息系统 (GIS), 地理数据科学, 可视化和公共卫生。她的论文是在一个 GIS 系统接口联系退伍军人福利医院的传统和非传统数据，帮助病人为他们的健康状况作出更为明朗的决定。
via: https://opensource.com/article/17/6/collecting-and-mapping-twitter-data-using-r
作者：Dorris Scott 译者：XYenChi 校对：校对者ID