knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(punkapi)
res <- httr::GET("https://api.punkapi.com/v2/beers", query = list("per_page" = "80")) check_results(res) df <- httr::content(res) # retrieve a specific summary (tibble) for a beer class object # df must be a list of dataframes of beer class object # Not works summary.beer(df) # works attr(df, "class") <- "beer" summary(df)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.