# NOT RUN {
endp <- cosmos_endpoint("https://myaccount.documents.azure.com:443/", key="mykey")
db <- get_cosmos_database(endp, "mydatabase")
do_cosmos_op(db) %>%
process_cosmos_response()
cont <- get_cosmos_container(db, "mycontainer")
do_cosmos_op(cont) %>%
process_cosmos_response()
# }
Run the code above in your browser using DataLab