From 9e0c92242eca7c433fc244a8e121bd8338c911f0 Mon Sep 17 00:00:00 2001 From: aaronshaw Date: Sat, 28 Mar 2020 17:30:37 -0500 Subject: [PATCH 1/2] Loading data directly from github URL. Commenting out commands that assume cloned repository. --- .../analysis/related_searches_example.R | 20 +++++++++++++------ 1 file changed, 14 insertions(+), 6 deletions(-) diff --git a/transliterations/analysis/related_searches_example.R b/transliterations/analysis/related_searches_example.R index 2576d4a..e1197b6 100644 --- a/transliterations/analysis/related_searches_example.R +++ b/transliterations/analysis/related_searches_example.R @@ -3,16 +3,24 @@ ### ### Minimal example analysis file using trending search data -### Identify data source directory and file -DataDir <- ("../data/output/") -DataFile <- ("related_searches_top.csv") - ### Import and cleanup data -related.searches.top <- read.table(paste(DataDir,DataFile, - sep=""), + +DataURL <- + url("https://github.com/CommunityDataScienceCollective/COVID-19_Digital_Observatory/blob/master/transliterations/data/output/related_searches_top.csv") + +related.searches.top <- read.table(DataURL, sep=",", header=TRUE, stringsAsFactors=FALSE) +### Alternatively, uncomment and run if working locally with full git tree +### Identify data source directory and file +## DataDir <- ("../data/output/") +## DataFile <- ("related_searches_top.csv") + +## related.searches.top <- read.table(paste(DataDir,DataFile, sep=""), +## sep=",", header=TRUE, +## stringsAsFactors=FALSE) + ### Aggregate top 5 search queries by term/day top5.per.term.date <- aggregate(query ~ term + date, data=related.searches.top, From 1f5b15f0997e66d6bf981d8661f4a50a7a307cdb Mon Sep 17 00:00:00 2001 From: aaronshaw Date: Sat, 28 Mar 2020 17:31:36 -0500 Subject: [PATCH 2/2] regenerated following update to R src that creates this file --- .../output/top5_queries_per_term_per_date.csv | 15 ++++++++++----- 1 file changed, 10 insertions(+), 5 deletions(-) diff --git a/transliterations/analysis/output/top5_queries_per_term_per_date.csv b/transliterations/analysis/output/top5_queries_per_term_per_date.csv index 5ce1aa7..83b5aff 100644 --- a/transliterations/analysis/output/top5_queries_per_term_per_date.csv +++ b/transliterations/analysis/output/top5_queries_per_term_per_date.csv @@ -1,6 +1,11 @@ "term","date","query.1","query.2","query.3","query.4","query.5" -"coronavirus","2020-03-27",coronavirus update,corona,coronavirus symptoms,news coronavirus,coronavirus cases -"covid-19","2020-03-27",covid-19 coronavirus,coronavirus,covid,covid-19 cases,covid 19 -"covid-19 pandemic","2020-03-27",coronavirus,covid-19 coronavirus pandemic,coronavirus pandemic,who,is covid-19 a pandemic -"covid19","2020-03-27",covid,covid 19,coronavirus covid19,coronavirus,covid19 cases -"sars-cov-2","2020-03-27",coronavirus,coronavirus sars-cov-2,covid-19,covid-19 sars-cov-2,sars +"coronavirus",2020-03-27,coronavirus update,corona,coronavirus symptoms,news coronavirus,coronavirus cases +"covid-19",2020-03-27,covid-19 coronavirus,coronavirus,covid,covid-19 cases,covid 19 +"covid-19 pandemic",2020-03-27,coronavirus,covid-19 coronavirus pandemic,coronavirus pandemic,who,is covid-19 a pandemic +"covid19",2020-03-27,covid,covid 19,coronavirus covid19,coronavirus,covid19 cases +"sars-cov-2",2020-03-27,coronavirus,coronavirus sars-cov-2,covid-19,covid-19 sars-cov-2,sars +"coronavirus",2020-03-28,coronavirus update,corona,coronavirus symptoms,news coronavirus,coronavirus cases +"covid-19",2020-03-28,coronavirus,coronavirus covid-19,covid,covid-19 cases,covid 19 +"covid-19 pandemic",2020-03-28,coronavirus pandemic,coronavirus,covid-19 coronavirus pandemic,is covid-19 a pandemic,who pandemic +"covid19",2020-03-28,covid,covid 19,coronavirus covid19,coronavirus,covid19 cases +"sars-cov-2",2020-03-28,coronavirus sars-cov-2,coronavirus,sars-cov-2 covid-19,covid-19,sars