DOCNAME <- tools::file_path_sans_ext(knitr::current_input()) source(here::here("R", "knitr-options.R"))
source(here::here("R", "libraries.R"))
cache_file <- here("data", paste0(DOCNAME, ".Rds")) hashtags_vec <- str_split(params$hashtag, ",")[[1]] hashtags_query <- paste(hashtags_vec, collapse = " OR ") tweets <- clamour_load_tweets(hashtags_query, cache_file, timezone = params$timezone, fixed = params$fixed)
An analysis of tweets for the query r hashtags_query
related to
{{DESCRIPTION}} from r params$start_day
to r params$end_day
. A total of
r nrow(tweets)
tweets from r length(unique(tweets$screen_name))
users were
collected using the {rtweet} R package.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.