## Not run:
# (x <- Cushion$new())
#
# db_create(x, dbname='leothelion')
# bulk_create(x, mtcars, dbname="leothelion")
#
# db_alldocs(x, dbname="leothelion")
# db_alldocs(x, dbname="leothelion", as='json')
# db_alldocs(x, dbname="leothelion", limit=2)
# db_alldocs(x, dbname="leothelion", limit=2, include_docs=TRUE)
#
# # curl options
# library('httr')
# res <- db_alldocs(x, dbname="leothelion", config=verbose())
# ## End(Not run)
Run the code above in your browser using DataLab