R/Campaign_summary.R

In mark-brackenrig/campaignmonitoR: API wrapper for Campaign Monitor

Campaign_summary <- function(campaignID,auth=Sys.getenv("CampMonauth")){
    url <- paste0('https://api.createsend.com/api/v3.2/campaigns/',campaignID,'/summary.json', collapse = ", ")
    
    raw.result = GET(url = url,authenticate(user = auth, password = ""))
    
    this.raw.content <- rawToChar(raw.result$content)
    
    this.content <- fromJSON(this.raw.content)
    
    return(as.data.frame(this.content))
    }