database.md

title
database

dbplyr

list connection driver

odbc::odbcListDrivers()

Connect to DB

library(DBI)
con <- DBI::dbConnect(odbc::odbc(), "BILIVE", UID="JUMP_B", PWD="******")

list table

dbListTables(con, schema = "JUMP_B")
dbListTables(con, schema = "SB_BI")

push table into database

dbWriteTable(con, "mtcars", mtcars[1:5, ])

RODBC

Connect to DB

library(RODBC)
channel <- odbcConnect('BILIVE',
                   uid = 'JUMP_B',
                   pwd = '******')

Get data

cus <- sqlQuery(con, "select /*+ PARALLEL(11) */ * from nnb_cus") 

This function load all rows