【发布时间】:2019-03-09 11:48:35
【问题描述】:
我正在尝试将一些 excel 文件读入数据框,然后写入 MySQL 数据库。以下程序能够读取文件并创建数据帧,但是当它尝试使用 dbWriteTable 命令写入数据库时,我收到一条错误消息 -Error in .local(conn, statement, ...) :
could not run statement: The used command is not allowed with this MySQL version
library(readxl)
library(RMySQL)
library(DBI)
mydb = dbConnect(RMySQL::MySQL(), host='<ip>', user='username', password='password', dbname="db",port=3306)
setwd("<directory path>")
file.list <- list.files(pattern='*.xlsx')
print(file.list)
dat = lapply(file.list, function(i){
print(i);
x = read_xlsx(i,sheet=NULL, range=cell_cols("A:D"), col_names=TRUE, skip=1, trim_ws=TRUE, guess_max=1000)
x$file=i
x
})
df = do.call("rbind.data.frame", dat)
dbWriteTable(mydb, name="table_name", value=df, append=TRUE )
dbDisconnect(mydb)
我检查了dbWriteTable 函数的定义,看起来它正在使用load data local inpath 将数据存储在数据库中。根据 Stackoverflow 上其他一些已回答的问题,我知道 local 这个词可能会引起关注,但由于它已经在函数定义中,我不知道我能做什么。此外,此语句使用“,”作为分隔符。但是我的数据在某些值中有“,”,这就是为什么我对使用数据框感兴趣,希望它能保留源结构。但现在我不太确定。
是否有任何其他方式/功能可以将数据帧写入 MySQL 表?
【问题讨论】: