library(jsonlite)
library(purrr)
categories <- read_json("https://www.yelp.com/developers/documentation/v3/all_category_list/categories.json")
category_aliases <- map_chr(categories, function(x) x$alias)
dput(category_aliases)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.