r - SQL 从 R 创建表 - 字符串数据，右截断

Question

我正在使用 Microsoft SQL Azure 版本 12，通过在 RStudio 服务器和 DBI 库上进行操作。我需要从长度为 4000 的变量的数据帧中创建多个 SQL 表。这可以作为

# Create dataframe
df <- data.frame("myid" = stringi::stri_rand_strings(5, 4000),
                 "mydate" = c(Sys.time(), Sys.time()-1, Sys.time()-2, Sys.time()-3, Sys.time()-4) )

# Create SQL table sschema.ttable
DBI::dbWriteTable(conn = connection,
                    name = DBI::Id(schema = "sschema", table = "ttable"),
                    value = df,
                    overwrite = TRUE)

这失败并出现以下错误

Error in result_insert_dataframe(rs@ptr, values, batch_rows) : nanodbc/nanodbc.cpp:1617: 00000: [Microsoft][ODBC Driver 17 for SQL Server]String data, right truncation

我试过

截断变量(次优)

创建表 > 将变量更改为格式 VARCHAR(6000)而不是 VARCHAR(255) > 附加数据框。这会导致相同的“字符串数据，右截断”错误。

任何解决方案如何直接从 R 数据帧创建 SQL 表？

Answer 1

答案是使用 field.types 定义变量及其所需的 SQL 变量类。如

# Create SQL table sschema.ttable
DBI::dbWriteTable(conn = connection,
                    name = DBI::Id(schema = "sschema", table = "ttable"),
                    field.types=c(myid="varchar(6000)"),
                    value = df,
                    overwrite = TRUE)