tutorial.R
In quoradsR: Get 'Quora' Ads Data via the 'Windsor.ai' API

## ---- include = FALSE---------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

load("my_quorads_data.RData")

## ----setup--------------------------------------------------------------------
library(quoradsR)

library(dplyr)
library(ggplot2)

## ---- eval = FALSE------------------------------------------------------------
#  
#  my_quorads_data <-
#    fetch_quorads(api_key = "your api key",
#             date_from = Sys.Date()-100,
#             date_to = Sys.Date(),
#             fields = c("campaign", "clicks",
#                        "spend", "impressions", "date"))

## -----------------------------------------------------------------------------
str(my_quorads_data)

## -----------------------------------------------------------------------------
ggplot(my_quorads_data, aes(y = clicks, fill = campaign)) + geom_boxplot()

## -----------------------------------------------------------------------------
lmod <- glm(clicks ~ campaign, data = my_quorads_data, family = "poisson")
summary(lmod)