Postgres
install.packages("RPostgres")
library(dbx)
db <- dbxConnect(adapter="postgres", dbname="mydb")You can also pass user, password, host, port, and url.
RPostgreSQL数据库也是这样操作的
举个例子，完整的连接因该是：
db <- dbxConnect(adapter = "postgres", dbname = " data", host = "test.cls0csjdlwvj.us-west-2.redshift.amazonaws.com", user='milin', password='Milin123', port=5439)
MySQL
install.packages("RMySQL")
library(dbx)
db <- dbxConnect(adapter="mysql", dbname="mydb")You can also pass user, password, host, port, and url and Works with RMariaDB as well
SQLite
install.packages("RSQLite")
library(dbx)
db <- dbxConnect(adapter="sqlite", dbname=":memory:")SQL Server
install.packages("odbc")
library(dbx)
db <- dbxConnect(adapter=odbc::odbc(), database="mydb")You can also pass uid, pwd, server, and port.
Redshift
For Redshift, follow the Postgres instructions.
操作
选择数据
records <- dbxSelect(db, "SELECT * FROM forecasts")
设置参数
dbxSelect(db, "SELECT * FROM forecasts WHERE period = ? AND temperature > ?", params=list("hour", 27))插入数据
table <- "forecasts"records <- data.frame(temperature=c(32, 25)) dbxInsert(db, table, records)
If you use auto-incrementing ids in Postgres, you can get the ids of newly inserted rows by passing the column name:
dbxInsert(db, table, records, returning=c("id"))更新数据
records <- data.frame(id=c(1, 2), temperature=c(16, 13))dbxUpdate(db, table, records, where_cols=c("id"))删除数据
bad_records <- data.frame(id=c(1, 2))dbxDelete(db, table, where=bad_records)
作者：Liam_ml
链接：https://www.jianshu.com/p/b535cf5a0702
随时随地看视频
