R語言之MYSQL數據庫獲取及輸出

R語言之MYSQL數據庫獲取及輸出

在這裏我們使用ODBC連接，連接之前請先配置ODBC

MYSQL  ODBC下載地址:http://dev.mysql.com/downloads/connector/odbc

配置方法請參照：http://blog.csdn.net/hongweigg/article/details/49779943

library(RODBC)
#建立一個到ODBC 數據庫的連接
channel <- odbcConnect("mysql_data", uid="root", pwd="12345678")
#在這裏我的真實連接信息
#查看數據庫中的表 
sqlTables(channel)

   #返回結果

TABLE_CAT TABLE_SCHEM       TABLE_NAME     TABLE_TYPE REMARKS

1 my_firstsql                                        infor                                  TABLE        

2 my_firstsql                                 my_firsttable                         TABLE        

3 my_firstsql                                      provinces                           TABLE        

4 my_firstsql                                  rename_table                       TABLE        

5 my_firstsql                                   tdb_goods                             TABLE        

6 my_firstsql                            tdb_goods_brands                     TABLE        

7 my_firstsql                                tdb_goods_cates                     TABLE        

#讀取ODBC數據庫中的某個表到一個數據框中
data <- sqlFetch(channel,"infor")
#向ODBC 數據庫提交一個查詢並返回結果
query = 'SELECT * FROM infor WHERE age < 19' #mysql查詢語句
my_select <- sqlQuery(channel,query)
#將數據框寫入或更新（append=TRUE）到ODBC數據庫的某個表中
r_df <- data.frame(x  = seq(0, 8, 2), y = letters[1:5])
sqlSave(channel,  # 創建的數據連接
        r_df, #R數據框名稱
        tablename = "r_sql_data", # 數據庫表名
        rownames = FALSE, # 不存儲數據框的行名
        append = TRUE) # 添加新記錄到數據庫表中

#刪除ODBC 數據庫中的某個表
sqlDrop(channel,'r_sql_data') 
#關閉連接
close(channel)