Skip to content

Instantly share code, notes, and snippets.

@labeneator
Created October 4, 2013 21:51
Show Gist options
  • Save labeneator/6833401 to your computer and use it in GitHub Desktop.
Save labeneator/6833401 to your computer and use it in GitHub Desktop.
> library("RMySQL")
Attaching package: ‘RMySQL’
The following object is masked from ‘package:RSQLite’:
dbBuildTableDefinition, isIdCurrent, safe.write
> library("RMySQL")
> m <- dbDriver("MySQL")
> con <- dbConnect(m, user="root", host="localhost")
> rs <- dbSendQuery(con, "show databases")
> fetch(rs, n=100)
Database
1 information_schema
2 xxxxxxxxxx
3 mysql
4 performance_schema
5 test
> rs <- dbSendQuery(con, "select * from information_schema.STATISTICS limit 5;")
> fetch(rs, n=100)
TABLE_CATALOG TABLE_SCHEMA TABLE_NAME NON_UNIQUE INDEX_SCHEMA INDEX_NAME SEQ_IN_INDEX COLUMN_NAME COLLATION CARDINALITY SUB_PART PACKED NULLABLE INDEX_TYPE COMMENT
1 def mysql columns_priv 0 mysql PRIMARY 1 Host A NA NA <NA> BTREE
2 def mysql columns_priv 0 mysql PRIMARY 2 Db A NA NA <NA> BTREE
3 def mysql columns_priv 0 mysql PRIMARY 3 User A NA NA <NA> BTREE
4 def mysql columns_priv 0 mysql PRIMARY 4 Table_name A NA NA <NA> BTREE
5 def mysql columns_priv 0 mysql PRIMARY 5 Column_name A 0 NA <NA> BTREE
INDEX_COMMENT
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment