R 尝试将数据附加到本地服务器时出现dbAppendTable()错误
我刚刚开始我的r之旅,所以我是一个完全的新手,我找不到任何能帮助我解决这个问题的东西 我有一个csv表(每列随机整数),有9列。我读了8,我想把它们附加到一个包含8个字段的sql表中(Col1…8,都是int)。将csv上载到rStudio后,它看起来正确,只有8列: 我使用的代码是:R 尝试将数据附加到本地服务器时出现dbAppendTable()错误,r,R,我刚刚开始我的r之旅,所以我是一个完全的新手,我找不到任何能帮助我解决这个问题的东西 我有一个csv表(每列随机整数),有9列。我读了8,我想把它们附加到一个包含8个字段的sql表中(Col1…8,都是int)。将csv上载到rStudio后,它看起来正确,只有8列: 我使用的代码是: # Libraries library(DBI) library(odbc) library(tidyverse ) # CSV Files df = head( read_delim( "
# Libraries
library(DBI)
library(odbc)
library(tidyverse )
# CSV Files
df = head(
read_delim(
"C:/Data/test.txt",
" ",
trim_ws = TRUE,
skip = 1,
skip_empty_rows = TRUE,
col_types = cols('X7'=col_skip())
)
, -1
)
# Add Column Headers
col_headings <- c('Col1', 'Col2', 'Col3', 'Col4', 'Col5', 'Col6', 'Col7', 'Col8')
names(df) <- col_headings
# Connect to SQL Server
con <- dbConnect(odbc(), "SQL", timeout = 10)
# Append data
dbAppendTable(conn = con,
schema = "tmp",
name = "test",
value = df,
row.names = NULL)
> Error in result_describe_parameters(rs@ptr, fieldDetails) :
> Query requires '8' params; '18' supplied.