我想安排我的R代码输出(dataframe)包含SQL表中的多行和列

Question

我有我的代码写在R，给我的数据帧作为输出。现在我想插入数据框架，有多个列和行在SQL表中使用一些R代码。为此，我通过ODBC包将RStudio与SQL Server连接，并使用以下插入函数。实际上，我的R代码的输出工作，如果我试图插入我的输出(数据帧)，只有一列多行，在一列的时间。为此，我使用了以下代码:

conn <-odbcConnect("database")
link=("https://www.ncbi.nlm.nih.gov/protein/?term=antimicrobial+peptides+AND+ 
(%221%22%5BSLEN%5D%3A+%22+50%22%5BSLEN%5D)")
AMPs<-read_html(html)
AMPs
protein_link_title<-AMPs %>% html_nodes(".title a")%>% html_text()
protein_link_title
title<- sqlQuery(conn,paste0("INSERT INTO AMPs(protein_link_title) VALUES('", 
protein_link_title, "')")) 
title`

这是我正在使用的代码，它正在插入名为"protein_link_title"栏的蛋白质标题这是我在SQL中创建的，但这次我想插入我的R输出(多行和多列的数据框)，在多个列一次。我想在SQL表的多列中插入更多的值。请帮助我。提前谢谢。

Answer 1

函数DBI::dbAppendTable用于将数据框架的所有行和所有列附加到数据库的表中。请记住，数据库中必须已经存在具有相同列和相同类型的表。

library(DBI)
library(odbc)
# create an example data frame to put into the data base
data <- data.frame(protein_link_title = c("Chain A", "Chain B", "Chain C"))
conn <- dbConnect(odbc(),
Driver = "SQL Server",
Server = "localhost\SQLEXPRESS",
Database = "datawarehouse",
Trusted_Connection = "True"
)
dbAppendTable(conn = conn, value = data, name = "my_table_name")