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

## -----------------------------------------------------------------------------
knitr::include_graphics("invalid_request.png")

## -----------------------------------------------------------------------------
# library(googledrive)
# 
# drive_auth(use_oob = TRUE)
# 
# # now carry on with your work
# drive_find(n_max = 5)

## -----------------------------------------------------------------------------
# options(gargle_oob_default = TRUE)

## -----------------------------------------------------------------------------
# options(gargle_oauth_client_type = "web")