RMySQL讀取mysql資料庫的嘗試

剛剛很艱難的在windows下安裝上RMySQL，詳見

RMySQL在windows下的安裝方法

迫不及待的測試了一下

參考資料：http://www.biosino.org/R/R-doc/R-data_cn/DBI-_002f-RMySQL.html

 

1、串連資料庫

> library(RMySQL) #載入包> con <- dbConnect(dbDriver("MySQL"), dbname = "eswp", user="root", password="root")  #串連資料庫，必須通過user和password輸入使用者名稱和密碼，不然連不上

2、列出表中資料庫

 dbListTables(con) [1] "2008yearnew"                  "agent"                        "artifact"                     [4] "cancer_data"                  "chinese_drug"                 "conceptnum"  

3、讀取table

> dbReadTable(con, "foreign_drug")[3:7,1:2]#資料太多，唯讀取一部分                                                                                                        URL register_no3 http://app1.sfda.gov.cn/datasearch/face3/content.jsp?tableId=36&tableName=TABLE36&tableView=????&Id=10987   H201201974 http://app1.sfda.gov.cn/datasearch/face3/content.jsp?tableId=36&tableName=TABLE36&tableView=????&Id=10990   H201201965 http://app1.sfda.gov.cn/datasearch/face3/content.jsp?tableId=36&tableName=TABLE36&tableView=????&Id=10984   H201201816 http://app1.sfda.gov.cn/datasearch/face3/content.jsp?tableId=36&tableName=TABLE36&tableView=????&Id=10993   H201201847 http://app1.sfda.gov.cn/datasearch/face3/content.jsp?tableId=36&tableName=TABLE36&tableView=????&Id=10978   H20120182

4、查詢table

> dbGetQuery(con, paste("select URL,register_no from foreign_drug where register_no ='H20120197' or register_no ='H20120196'"))                                                                                                        URL register_no1 http://app1.sfda.gov.cn/datasearch/face3/content.jsp?tableId=36&tableName=TABLE36&tableView=????&Id=10987   H201201972 http://app1.sfda.gov.cn/datasearch/face3/content.jsp?tableId=36&tableName=TABLE36&tableView=????&Id=10990   H20120196

5、刪除表，中斷連線

> dbRemoveTable(con, "foreign_drug")[1] TRUE> dbDisconnect(con)[1] TRUE

 

先回去了，明天接著學習。

生命不息，學習不止。