使用R变量将查询发送到RMYSQL的表格

Question

我正在尝试编写我在R中创建的数据，并存储在MySQL表中的数组中。目前，这就是我的做法，

for(z in 1:60){
  dbSendQuery(
    mydb, 
    "insert into minutely_predictions(id,server_pred, server_hi, server_lo, os_pred, os_hi, os_lo, sessions_id) values(server__id,server_pred[i],server_hi[i],server_lo[i],os_pred[i],os_hi[i],os_lo[i],sesh_id)"
  )  
}

我会遇到MySQL语法错误，是否有一种方法可以将我试图从R传递到MySQL的变量？

谢谢。

Answer 1

考虑参数化的最佳实践，并避免变量与SQL语句的串联串联或插值。

# PREPARED STATEMENT WITH QMARK PLACEHOLDERZ
sql <- "insert into minutely_predictions(
            id, server_pred, server_hi, server_lo, 
            os_pred, os_hi, os_lo, sessions_id) 
        values (?, ?, ?, ?, ?, ?, ?, ?)"

# ITERATE THROUGH ARRAYS AND BIND PARAMS
for(i in 1:60) { 
    stmt <- dbSendStatement(mydb, sql)
    dbBind(
        stmt,
        list(
            server__id, server_pred[i], server_hi[i], server_lo[i],
            os_pred[i], os_hi[i], os_lo[i], sesh_id
        )
    )
    dbClearResult(stmt)
}

注意：上面只有使用首选 rmariaiadb （替换遗产rmysql）。

Answer 2

我能够通过使用函数sprintf并以这种方式存储变量来修复它，希望这可以对其他人有所帮助。

queryform = "insert into table(parameters) values('%d' .....)"
query = sprintf(queryform, value[1])
send = dbSendQuery(mydb,query)