conn <- dbConnect("Oracle", "user/password@SID")
if(dbExistsTable(con, "fuel_frame")){
dbRemoveTable(conn, "fuel_frame")
dbWriteTable(conn, "fuel_frame", fuel.frame)
}
if(dbExistsTable(conn, "RESULTS")){
dbWriteTable(conn, "RESULTS", results2000, append = T)
else
dbWriteTable(conn, "RESULTS", results2000)
}
Run the code above in your browser using DataLab