In jimrothstein/youtube_api: R functions to use Google Youtube API

List of youtube videos in my Documentaries playlist, 000_httr_youtube_playlist_TALK.pdf
Check politican's donors ```{zsh, child=c("004_curl_opensecrets.Rmd")}

-   List or Create **Github Gist**


To obtain my gists (only)
```{zsh}
export token=$(Rscript -e "cat(Sys.getenv('GITHUB_PAT'))")

curl -s \
  -H "Authorization: token $token" \
  -H "Accept: application/vnd.github.v3+json" \
  https://api.github.com/gists \
  | head -n 30

{
file <- "slide_restful_examples.Rmd"
file  <- normalizePath(file)
file
}
rmarkdown::render(file)
rmarkdown::render(file, output_dir="~/Downloads/print_and_delete")