# NOT RUN {
# }
# NOT RUN {
## lookup a specific collection
cnnc <- get_collections("cnn")
## inspect data
str(cnnc)
## by status id
wwe <- get_collections(status_id = "925172982313570306")
## inspect data
str(wwe)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab