R/tweet_locations.R

In lukemcphillips/trumppackage2.0: Analyze Trump Tweets

library(twitteR)
library(tidytext)
library(dplyr)
library(tidyr)
library(stringr)
library(RCurl)


#' Retrieve location data for tweets about Donald Trump
#'
#' @return Data of latitude and longitudes of tweet data
#' @export
lat_lon <- function() {

  d <- tweets()

  tweet_loc = data.frame(lon = d$longitude, lat = d$latitude)

  tweet_loc

}