我当前正在运行一个循环,以检查从SQL调用的函数中是否包含某些ID,但是函数表没有唯一的ID列。在将列表重新绑定在一起之前,我想将唯一ID附加到输出。
我的代码当前如下所示:
channel = RODBC::odbcDriverConnect("some connection")
output <- list()
for (i in 1:nrow(df)){
unique_id <- df$col1[i]
query = sprintf("select * from table1('%s')",unique_id)
query = RODBC::sqlQuery(channel, query)
output[[i]] <- query
}
final_output <- do.call('rbind',output)