RdbGetQuery <- function(con, query, key = NULL, ...) {
res <- dbGetQuery(con, query)
setDT(res, key = key)
return(res)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.