rocker-R6-class | R Documentation |
R6 class interface for handling database connections using DBI package as backend. The class allows handling of connections to e.g. PostgreSQL, MariaDB and SQLite.
R6Class
.drv
Read only DBI::DBIDriver-class object or NULL. It is recommended not to use this object! For advanced user, object can be used for direct execution of functions from DBI package.
.con
Read only DBI::DBIConnection-class object or NULL. It is recommended not to use this object! For advanced user, object can be used for direct execution of functions from DBI package.
.res
Read only DBI::DBIResult-class object or NULL. It is recommended not to use this object! For advanced user, object can be used for direct execution of functions from DBI package.
transaction
Read only TRUE or FALSE. Information on pending transaction.
info
Read only driver package and connection parameter information list.
verbose
TRUE or FALSE. Switch text output on / off.
id
Optional object ID/name
validateQuery
SQL statement used in validateCon
new()
Generate new instance of class.
rocker$new(verbose = TRUE, id = NULL, ...)
verbose
TRUE or FALSE. Switch text output on / off.
id
Optional object ID/name
...
Not used yet
New instance of class
print()
Print object information.
rocker$print()
Invisible self
setupDriver()
Setup database driver and define connection parameters.
rocker$setupDriver(drv, protect = c("password", "user"), ...)
drv
Driver object from suitable package e.g. RPostgres::Postgres()
, RMariaDB::MariaDB()
and RSQLite::SQLite()
protect
Parameters to be hidden
...
Suitable parameters passed to DBI::dbConnect()
e.g. host, port, dbname, user and password
Invisible self
db <- rocker::newDB() db$setupDriver( drv = RSQLite::SQLite(), dbname = ":memory:" ) db$unloadDriver()
setupPostgreSQL()
Setup database driver and define connection parameters for PostgreSQL using RPostgres package. Wrapper for setupDriver() function.
rocker$setupPostgreSQL( host = "127.0.0.1", port = "5432", dbname = "mydb", user = "postgres", password = "password", protect = c("password", "user"), ... )
host
Host name or IP number
port
Port number
dbname
Database name
user
User name
password
Password
protect
Parameters to be hidden
...
Optional, additional suitable parameters passed to DBI::dbConnect()
Invisible self
db <- rocker::newDB() db$setupPostgreSQL( host = "127.0.0.1", port = "5432", dbname = "mydb", user = "postgres", password = "password" ) db$unloadDriver()
setupMariaDB()
Setup database driver and define connection parameters for MariaDB using RMariaDB package. Wrapper for setupDriver() function.
rocker$setupMariaDB( host = "127.0.0.1", port = "3306", dbname = "mydb", user = "root", password = "password", protect = c("password", "user"), ... )
host
Host name or IP number
port
Port number
dbname
Database name
user
User name
password
Password
protect
Parameters to be hidden
...
Optional, additional suitable parameters passed to DBI::dbConnect()
Invisible self
db <- rocker::newDB() db$setupMariaDB( host = "127.0.0.1", port = "3306", dbname = "mydb", user = "root", password = "password" ) db$unloadDriver()
setupSQLite()
Setup database driver and define connection parameters for SQLite using RSQLite package. Wrapper for setupDriver() function.
rocker$setupSQLite(dbname = ":memory:", protect = c("password", "user"), ...)
dbname
Database name
protect
Parameters to be hidden
...
Optional, additional suitable parameters passed to DBI::dbConnect()
Invisible self
db <- rocker::newDB() db$setupSQLite( dbname = ":memory:" ) db$unloadDriver()
unloadDriver()
Reset database driver and connection parameters.
rocker$unloadDriver(...)
...
Optional, suitable parameters passed to DBI::dbUnloadDriver()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$unloadDriver()
canConnect()
Test connection parameters.
rocker$canConnect(...)
...
Optional, suitable parameters passed to DBI::dbCanConnect()
TRUE or FALSE
db <- rocker::newDB() db$setupSQLite() db$canConnect() db$unloadDriver()
connect()
Establish database connection using stored parameters.
rocker$connect(...)
...
Optional, additional suitable parameters passed to DBI::dbConnect()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$disconnect() db$unloadDriver()
disconnect()
Disconnect database.
rocker$disconnect(...)
...
Optional, additional suitable parameters passed to DBI::dbDisconnect()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$disconnect() db$unloadDriver()
sendQuery()
Send SQL query to database.
rocker$sendQuery(statement, ...)
statement
SQL query (SELECT
)
...
Optional, additional suitable parameters passed to DBI::dbSendQuery()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch() db$clearResult() db$disconnect() db$unloadDriver()
getQuery()
Retrieve SQL query from database. Combination of functions sendQuery(), fetch() and clearResult(). If required, database is automatically connected and disconnected.
rocker$getQuery(statement, n = -1, ...)
statement
SQL query (SELECT
)
n
Number of record to be fetched at once. All records will be fetched.
...
Optional, additional suitable parameters passed to DBI::dbSendQuery()
Records
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) output <- db$getQuery("SELECT * FROM mtcars;") db$disconnect() db$unloadDriver()
sendStatement()
Send SQL statement to database.
rocker$sendStatement(statement, ...)
statement
SQL statement (UPDATE, DELETE, INSERT INTO, ...
)
...
Optional, additional suitable parameters passed to DBI::dbSendStatement()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$clearResult() db$disconnect() db$unloadDriver()
execute()
Execute SQL statement in database. Combination of functions execute and clearResult. If required, database is automatically connected and disconnected.
rocker$execute(statement, ...)
statement
SQL statement (UPDATE, DELETE, INSERT INTO, ...
)
...
Optional, additional suitable parameters passed to DBI::dbSendStatement()
Number of affected rows
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$execute("DELETE FROM mtcars WHERE gear = 3;") db$disconnect() db$unloadDriver()
fetch()
Fetch SQL query result from database.
rocker$fetch(n = -1, ...)
n
Number of record to be fetched
...
Optional, additional suitable parameters passed to DBI::dbFetch()
Records
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch() db$clearResult() db$disconnect() db$unloadDriver()
hasCompleted()
Information whether all records were retrieved.
rocker$hasCompleted(...)
...
Optional, additional suitable parameters passed to DBI::dbHasCompleted()
TRUE or FALSE
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch(5) db$hasCompleted() db$clearResult() db$disconnect() db$unloadDriver()
getRowsAffected()
Information on number of affected rows.
rocker$getRowsAffected(...)
...
Optional, additional suitable parameters passed to DBI::dbGetRowsAffected()
Number of affected rows
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$getRowsAffected() db$clearResult() db$disconnect() db$unloadDriver()
getRowCount()
Information on number of retrieved rows.
rocker$getRowCount(...)
...
Optional, additional suitable parameters passed to DBI::dbGetRowCount()
Number of retrieved rows
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch() db$getRowCount() db$clearResult() db$disconnect() db$unloadDriver()
columnInfo()
Information on query result columns.
rocker$columnInfo(...)
...
Optional, additional suitable parameters passed to DBI::dbColumnInfo()
Information table
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") db$columnInfo() db$clearResult() db$disconnect() db$unloadDriver()
getStatement()
Information on sent statement.
rocker$getStatement(...)
...
Optional, additional suitable parameters passed to DBI::dbGetStatement()
Statement text
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") db$getStatement() db$clearResult() db$disconnect() db$unloadDriver()
clearResult()
Clear query or statement result.
rocker$clearResult(...)
...
Optional, additional suitable parameters passed to DBI::dbClearResult()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch() db$clearResult() db$disconnect() db$unloadDriver()
begin()
Begin transaction.
rocker$begin(...)
...
Optional, additional suitable parameters passed to DBI::dbBegin()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$begin() db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$clearResult() db$commit() db$disconnect() db$unloadDriver()
commit()
Commit transaction.
rocker$commit(...)
...
Optional, additional suitable parameters passed to DBI::dbCommit()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$begin() db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$clearResult() db$commit() db$disconnect() db$unloadDriver()
rollback()
Rollback transaction.
rocker$rollback(...)
...
Optional, additional suitable parameters passed to DBI::dbRollback()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$begin() db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$clearResult() db$rollback() db$disconnect() db$unloadDriver()
getInfoDrv()
Information on driver object.
rocker$getInfoDrv(...)
...
Optional, additional suitable parameters passed to DBI::dbGetInfo()
Information list
db <- rocker::newDB() db$setupSQLite() db$getInfoDrv() db$unloadDriver()
getInfoCon()
Information on connection object.
rocker$getInfoCon(...)
...
Optional, additional suitable parameters passed to DBI::dbGetInfo()
Information list
db <- rocker::newDB() db$setupSQLite() db$connect() db$getInfoCon() db$disconnect() db$unloadDriver()
getInfoRes()
Information on result object.
rocker$getInfoRes(...)
...
Optional, additional suitable parameters passed to DBI::dbGetInfo()
Information list
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") db$getInfoRes() db$clearResult() db$disconnect() db$unloadDriver()
isValidDrv()
Check driver object.
rocker$isValidDrv(onLostNull = FALSE, ...)
onLostNull
TRUE or FALSE. If driver lost, set .drv to NULL
...
Optional, additional suitable parameters passed to DBI::dbIsValid()
TRUE or FALSE
db <- rocker::newDB() db$setupSQLite() db$isValidDrv() db$unloadDriver()
isValidCon()
Check connection object.
rocker$isValidCon(onLostNull = FALSE, ...)
onLostNull
TRUE or FALSE. If connection lost, set .con to NULL
...
Optional, additional suitable parameters passed to DBI::dbIsValid()
TRUE or FALSE
db <- rocker::newDB() db$setupSQLite() db$connect() db$isValidCon() db$disconnect() db$unloadDriver()
isValidRes()
Check result object.
rocker$isValidRes(onLostNull = FALSE, ...)
onLostNull
TRUE or FALSE. If result lost, set .res to NULL
...
Optional, additional suitable parameters passed to DBI::dbIsValid()
TRUE or FALSE
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") db$isValidRes() db$clearResult() db$disconnect() db$unloadDriver()
validateCon()
Check if an earlier opened connection is still open.
rocker$validateCon(statement = NULL, onLostNull = FALSE, ...)
statement
Optional SQL statement. If not set default validateQuery will be used.
onLostNull
TRUE or FALSE. If connection lost, set .con to NULL
...
Not used yet
TRUE or FALSE
db <- rocker::newDB() db$setupSQLite() db$connect() db$validateCon() db$disconnect() db$unloadDriver()
createTable()
Create empty formatted table.
rocker$createTable(name, fields, ...)
name
Table name
fields
Template data.frame
...
Optional, additional suitable parameters passed to DBI::dbCreateTable()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$createTable("mtcars", mtcars) db$disconnect() db$unloadDriver()
appendTable()
Append data to table.
rocker$appendTable(name, value, ...)
name
Table name
value
Values data.frame
...
Optional, additional suitable parameters passed to DBI::dbAppendTable()
Number of appended rows invisibly
db <- rocker::newDB() db$setupSQLite() db$connect() db$createTable("mtcars", mtcars) db$appendTable("mtcars", mtcars) db$disconnect() db$unloadDriver()
writeTable()
Write data to table.
rocker$writeTable(name, value, ...)
name
Table name
value
Values data.frame
...
Optional, additional suitable parameters passed to DBI::dbWriteTable()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$disconnect() db$unloadDriver()
readTable()
Read table.
rocker$readTable(name, ...)
name
Table name
...
Optional, additional suitable parameters passed to DBI::dbReadTable()
Table
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) output <- db$readTable("mtcars") db$disconnect() db$unloadDriver()
removeTable()
Remove table.
rocker$removeTable(name, ...)
name
Table name
...
Optional, additional suitable parameters passed to DBI::dbRemoveTable()
Invisible self
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$removeTable("mtcars") db$disconnect() db$unloadDriver()
existsTable()
Check if table exists.
rocker$existsTable(name, ...)
name
Table name
...
Optional, additional suitable parameters passed to DBI::dbExistsTable()
TRUE or FALSE
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$existsTable("mtcars") db$disconnect() db$unloadDriver()
listFields()
List table column names.
rocker$listFields(name, ...)
name
Table name
...
Optional, additional suitable parameters passed to DBI::dbListFields()
Column names
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$listFields("mtcars") db$disconnect()
listObjects()
List database objects.
rocker$listObjects(...)
...
Optional, additional suitable parameters passed to DBI::dbListObjects()
List of objects
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$listObjects() db$disconnect()
listTables()
List database tables.
rocker$listTables(...)
...
Optional, additional suitable parameters passed to DBI::dbListTables()
List of objects
db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$listTables() db$disconnect()
Other rocker:
newDB()
,
rocker-README
,
rocker-S3-functions
,
rocker-package
# New database handling object db <- rocker::newDB() # Setup SQLite database db$setupSQLite() # Open connection db$connect() # Write table db$writeTable("mtcars", mtcars) # Get query output <- db$getQuery("SELECT * FROM mtcars;") # Close connection db$disconnect() # Reset database handling object db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$setupDriver` ## ------------------------------------------------ db <- rocker::newDB() db$setupDriver( drv = RSQLite::SQLite(), dbname = ":memory:" ) db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$setupPostgreSQL` ## ------------------------------------------------ db <- rocker::newDB() db$setupPostgreSQL( host = "127.0.0.1", port = "5432", dbname = "mydb", user = "postgres", password = "password" ) db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$setupMariaDB` ## ------------------------------------------------ db <- rocker::newDB() db$setupMariaDB( host = "127.0.0.1", port = "3306", dbname = "mydb", user = "root", password = "password" ) db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$setupSQLite` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite( dbname = ":memory:" ) db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$unloadDriver` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$canConnect` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$canConnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$connect` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$disconnect` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$sendQuery` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$getQuery` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) output <- db$getQuery("SELECT * FROM mtcars;") db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$sendStatement` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$execute` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$execute("DELETE FROM mtcars WHERE gear = 3;") db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$fetch` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$hasCompleted` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch(5) db$hasCompleted() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$getRowsAffected` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$getRowsAffected() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$getRowCount` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch() db$getRowCount() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$columnInfo` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") db$columnInfo() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$getStatement` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") db$getStatement() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$clearResult` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") output <- db$fetch() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$begin` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$begin() db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$clearResult() db$commit() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$commit` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$begin() db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$clearResult() db$commit() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$rollback` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$begin() db$sendStatement("DELETE FROM mtcars WHERE gear = 3;") db$clearResult() db$rollback() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$getInfoDrv` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$getInfoDrv() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$getInfoCon` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$getInfoCon() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$getInfoRes` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") db$getInfoRes() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$isValidDrv` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$isValidDrv() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$isValidCon` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$isValidCon() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$isValidRes` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$sendQuery("SELECT * FROM mtcars;") db$isValidRes() db$clearResult() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$validateCon` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$validateCon() db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$createTable` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$createTable("mtcars", mtcars) db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$appendTable` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$createTable("mtcars", mtcars) db$appendTable("mtcars", mtcars) db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$writeTable` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$readTable` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) output <- db$readTable("mtcars") db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$removeTable` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$removeTable("mtcars") db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$existsTable` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$existsTable("mtcars") db$disconnect() db$unloadDriver() ## ------------------------------------------------ ## Method `rocker$listFields` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$listFields("mtcars") db$disconnect() ## ------------------------------------------------ ## Method `rocker$listObjects` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$listObjects() db$disconnect() ## ------------------------------------------------ ## Method `rocker$listTables` ## ------------------------------------------------ db <- rocker::newDB() db$setupSQLite() db$connect() db$writeTable("mtcars", mtcars) db$listTables() db$disconnect()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.