matt/hack-grand-forks
1
0
Fork 0
Code Issues 13 Pull Requests Packages Projects Releases Wiki Activity

Get rolling on Twitter...

Browse Source
This commit is contained in:
Matt
2018-10-31 23:31:56 -05:00
parent d723990b77
commit 7ae6d2c4d4
1 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
bin/gfk-publicstuff.R
View File

@ -6,6 +6,7 @@
library(jsonlite) library(jsonlite)
library(rjson) library(rjson)
library(dplyr) library(dplyr)
library(twitteR)
# Grab city view for Grand Forks # Grab city view for Grand Forks
gfk <- rjson::fromJSON(file="https://www.publicstuff.com/api/2.1/city_view?space_id=15174") gfk <- rjson::fromJSON(file="https://www.publicstuff.com/api/2.1/city_view?space_id=15174")
@ -40,6 +41,13 @@ gfk_requests <- bind_rows(gfk_requests)
#### Tweeting #### Tweeting
# https://rcrastinate.blogspot.com/2018/05/send-tweets-from-r-very-short.html
# Need to create an external file with keys so they don't end up on GitHub
setup_twitter_oauth(consumer_key = "<your Consumer Key>",
access_token = "<your Acces Token>",
consumer_secret = "<your Consumer Secret>",
access_secret = "<your Access Token Secret>")
# After tweeting, write a small text file that has the last timestamp that was tweeted. Use that for grabbing future requests. # After tweeting, write a small text file that has the last timestamp that was tweeted. Use that for grabbing future requests.