con <- dbConnect("MySQL", group = "vitalAnalysis")
assignTable(con, "fuel_frame", fuel.frame)
removeTable(con, "fuel_frame")
if(existsTable(con, "RESULTS")){
assignTable(con, "RESULTS", results2000, append = T)
else
assignTable(con, "RESULTS", results2000)
}
Run the code above in your browser using DataLab