Rのデータフレームから、同じ名前でスキーマ名が異なるMySQLの複数のテーブルにデータをロードする

私の博士課程のスーパーバイザーは、これを行う方法を理解するのを手伝ってくれました。基本的に彼は書いた：

for ID_loop in info$ID {
print(ID_loop)
whattoinsert <- info %>% select(ID) %>% distinct()
query = paste("USE schemas.info",
               ID_loop,
               sep = " ")
print(query)
results <- DBI:dbGetQuery(con,query)
dbWriteTable(con, "info",whattoinsert,overwrite = TRUE)
 }

彼へのKudus:)