#' Filter tweets by date
#'
#' This function filter tweets file between given dates.
#'
#' @param tweets Dataframe with tweets data
#' @param start start date in format:"yyyy-mm-dd"
#' @param end end date in format:"yyyy-mm-dd"
#' @return tweets between given dates
#' @export
filter_by_date <- function(tweets, start, end) {
x <- dplyr::filter(tweets,dplyr::between(as.Date(tweets$created_at), as.Date(start), as.Date(end)))
return(x)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.