Description Usage Arguments Value Examples
Get document revisions.
1 | db_revisions(cushion, dbname, docid, simplify = TRUE, as = "list", ...)
|
cushion |
A |
dbname |
Database name |
docid |
Document ID |
simplify |
(logical) Simplify to character vector of revision ids.
If |
as |
(character) One of list (default) or json |
... |
Curl args passed on to |
JSON as a character string or a list (determined by the
as
parameter)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | ## Not run:
user <- Sys.getenv("COUCHDB_TEST_USER")
pwd <- Sys.getenv("COUCHDB_TEST_PWD")
(x <- Cushion$new(user=user, pwd=pwd))
if ("sofadb" %in% db_list(x)) {
db_delete(x, dbname = "sofadb")
}
db_create(x, dbname = "sofadb")
doc1 <- '{"name": "drink", "beer": "IPA", "score": 5}'
doc_create(x, dbname="sofadb", doc1, docid="abeer")
doc_create(x, dbname="sofadb", doc1, docid="morebeer", as='json')
db_revisions(x, dbname="sofadb", docid="abeer")
db_revisions(x, dbname="sofadb", docid="abeer", simplify=FALSE)
db_revisions(x, dbname="sofadb", docid="abeer", as='json')
db_revisions(x, dbname="sofadb", docid="abeer", simplify=FALSE, as='json')
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.