##' Insert a document
##'
##' Inserts a document into a Mongo collection
##'
##' @export
##' @param doc the list to be sent
mongoInsert <-
function(conn, dbname, collection, doc){
mongoSend(op_insert(paste(dbname, collection, sep="."), doc), conn)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.