# NOT RUN {
#set your API key with set_key(api_key = "XXXX")
#query search API up to 3 items
res <- tidy_cursored_search(query = "animal",
max_items = 3,
theme = "art",
media = TRUE)
head(res$data[, 1:3])
# }
Run the code above in your browser using DataLab