Nothing
#' @rdname SQLiteResult-class
#' @usage NULL
dbIsValid_SQLiteResult <- function(dbObj, ...) {
result_valid(dbObj@ptr)
}
#' @rdname SQLiteResult-class
#' @export
setMethod("dbIsValid", "SQLiteResult", dbIsValid_SQLiteResult)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.