fix file names

mkearney · Nov 21, 2017 · 30dc1b3 · 30dc1b3
1 parent d79c0d5
commit 30dc1b3
Show file tree

Hide file tree

Showing 5 changed files with 4 additions and 8 deletions.
diff --git a/R/freq_tables.R b/R/freq_tables.R
@@ -5,7 +5,7 @@ library(rtweet)
 library(ggplot2)
 
 ## Read in the streamed data
-d <- parse_stream("data/stream-1.json")
+d <- parse_stream("data/stream.json")
 
 ## function to create freq table
 tab_sort <- function (x, n = 10, mentions = FALSE) {

diff --git a/R/network_analysis.R b/R/network_analysis.R
@@ -5,7 +5,7 @@ library(rtweet)
 library(igraph)
 
 ## Read in the streamed data
-d <- parse_stream("data/stream-1.json")
+d <- parse_stream("data/stream.json")
 
 ## function to filter out missing and non-unique IDs
 uq_naomit <- function(x) unique(x[!is.na(x)])

diff --git a/R/sentiment_analysis.R b/R/sentiment_analysis.R
@@ -5,7 +5,7 @@ library(rtweet)
 lib(tidyverse)
 
 ## Read in the streamed data
-d <- parse_stream("data/stream-1.json")
+d <- parse_stream("data/stream.json")
 
 ## Estimate pos/neg sentiment for each tweet
 d$sentiment <- syuzhet::get_sentiment(d$text, "syuzhet")

diff --git a/R/word_cloud.R b/R/word_cloud.R
@@ -5,7 +5,7 @@ library(rtweet)
 library(ggplot2)
 
 ## Read in the streamed data
-d <- parse_stream("data/stream-1.json")
+d <- parse_stream("data/stream.json")
 
 ## function for cleaning text and creating word freq table
 clean_text_table <- function(data) {

diff --git a/README.md b/README.md
@@ -4,10 +4,6 @@ Collecting data on Twitter statuses containing the #NCA17 hashtag.
 ## Importing the data
 To import the Twitter data, see the [R/data.R](R/data.R) script file.
 
-## NCA Twitter tracking
-Here's the live output generated by the [live.R](live.R) script
-file. It updates every hour.
-
 ### Status frequency
 The number of #nca17 tweets aggregated in 1-hour intervals. View the
 code [here](R/time_series.R).