# NOT RUN {
solr <- TestSolr()
sc <- SolrCore(solr$uri)
name(sc)
ndoc(sc)
delete(sc)
docs <- list(
list(id="2", inStock=TRUE, price=2, timestamp_dt=Sys.time()),
list(id="3", inStock=FALSE, price=3, timestamp_dt=Sys.time()),
list(id="4", price=4, timestamp_dt=Sys.time()),
list(id="5", inStock=FALSE, price=5, timestamp_dt=Sys.time())
)
update(sc, docs)
q <- SolrQuery(id %in% as.character(2:4))
read(sc, q)
solr$kill()
# }
Run the code above in your browser using DataLab