con_dplyr<-function(){
require(dplyr)
ConnectInfo <- sharpen(triton())
src_mysql(ConnectInfo["dbname"], user = ConnectInfo["user"],
password = ConnectInfo["password"], host = ConnectInfo["host"],
port = as.numeric(ConnectInfo["port"]))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.