test/diamonds.R

# Run 'mongod' in the console to start MongoDB
# install_github("jeroenooms/mongolite")
library(mongolite)

# Init connection
m <- mongo_connect(collection = "diamonds")
if(mongo_collection_count(m) > 0){
  mongo_collection_drop(m)
}

# Dump some test data
data(diamonds, package="ggplot2")
mongo_stream_out(diamonds, m)

# Query
out <- mongo_stream_in(m)
SymbolixAU/mongolite_test documentation built on May 9, 2019, 3:30 p.m.