R/lotame_audience_estimates.R

In jackpalmer/LotameR: R Wrapper for the Lotame API

#' Lotame Audience Reach Estimate
#'
#' This function calls the Lotame API.
#' 
lotame_audience_reachestimate <- function(estimate_id){
    options(scipen=999)
    path <- paste0("https://api.lotame.com/2/audiences/reachEstimates/",
                   estimate_id)
    service_ticket <- lotame_service_ticket(path)
    req <- jsonlite::fromJSON(paste0(path,"?ticket=",service_ticket), flatten = T)
    return(req)
}