粘贴函数引号RMySQL

我试图从一个矩阵执行一个循环，但它不起作用；这是：

library(RMySQL)

for(i in 1:nrow(m_tblunif))
{
    Nm <- noquote(m_tblunif[[i,2]])
    PreNm <-noquote(m_tblunif[[i,3]])
    DateN<-noquote(m_tblunif[[i,4]])
    Idd <- noquote(m_tblunif[[i,9]])
    Flag <- noquote(m_tblunif[[i,10]])
    Critic <- noquote(m_tblunif[[i,11]])
data2<-paste("UPDATE membres_unif SET IDD=$Idd, 
    FLAG=$Flag, CRITIC=$Critic WHERE Nm=\"$Nm\",
    AND PreNm=\"$PreNm\", AND DateN=\"$DateN\"");
    sql_update_tbl_ds <- fn$dbSendQuery(dbconnection, data2)
}

编辑：问题是，R识别所有行，但我认为这条错误消息来自MySQL服务器：error in.localconn，statement，…：无法运行语句：SQL语法中有错误；检查与您的MySQL服务器版本对应的手册，以了解第1行的near'和PreNm=MADINE，以及DateN=01/01/1961'的正确语法

我尝试过不同的可能性，但我总是犯这个错误。 请问有可能吗？看看怎么了？ 如何用几行代码执行此循环，即：

 data2<-paste("UPDATE membres_unif SET IDD=noquote(m_tblunif[[i,9]]), 
    FLAG=noquote(m_tblunif[[i,10]]), CRITIC=noquote(m_tblunif[[i,11]]) WHERE Nm=\"noquote(m_tblunif[[i,2]])\",
    AND PreNm=\"noquote(m_tblunif[[i,3]])\", AND DateN=\"$DateN\"");
    sql_update_tbl_ds <- fn$dbSendQuery(dbconnection, data2)

---

提前感谢您的帮助

它不起作用-如果你更具体一些，人们会更容易帮助你好吧，你是wright，问题是，R识别所有的行，但我有一条错误消息，我认为来自MySQL服务器：error in.localconn，statement，…：无法运行语句：SQL语法中有错误；查看与MySQL服务器版本对应的手册，以了解第1行中使用near'和PreNm=MADINE，以及DateN=01/01/1961'的正确语法。我已经看到了在MADINE之后插入coma的第一部分的错误，。第二个问题仍然存在，即使我移除了昏迷（coma），即提高循环性能。