# NOT RUN {
endp <- cosmos_endpoint("https://myaccount.documents.azure.com:443/", key="mykey")
db <- get_cosmos_database(endp, "mydatabase")
cont <- get_cosmos_container(db, "mycontainer")
# a list of document objects
list_documents(cont)
# a data frame
list_documents(cont, as_data_frame=TRUE)
# a single document
doc <- get_document(cont, "mydocumentid")
doc$data
delete_document(doc)
# }
Run the code above in your browser using DataLab