如何通过R的DBI仅向Oracle表的部分列写入数据？

我在Oracle中有一张包含SDO_GEOMETRY类型的表，表结构如下：

CREATE TABLE T_GEO_TABLE
   (
    "LONGITUDE" DOUBLE, 
    "LATITUDE" DOUBLE, 
    "GEO" "SDO_GEOMETRY"
   );

在R语言中我有一个仅包含longitude和latitude列的数据框，希望通过DBI（RJDBC）将数据写入该Oracle表，之后再用SQL的UPDATE语句填充GEO字段。

使用dbWriteTable时，因为要求R数据框与数据库表列完全一致，我尝试给R数据框添加空的GEO列：

r_table <- r_table %>% mutate(GEO = NA)

再执行写入：

dbWriteTable(conn = con_oracle, name = "T_GEO_TABLE", value = r_table, overwrite = FALSE, append = TRUE)

但报错：ORA-00932: inconsistent datatypes: expected MDSYS.SDO_GEOMETRY got CHAR，尝试其他NA类型（如NA_character_、NA_integer_等）也出现同样问题。

目前我想到的方案是先将数据写入Oracle临时表（仅含longitude和latitude列），再通过dbSendUpdate执行后续SQL操作。

请问是否存在无需临时表的优雅实现方式？这个问题并不局限于SDO_GEOMETRY类型，本质是能否强制DBI函数仅向表的部分列插入数据？

方法1：使用dbAppendTable指定插入列 #

DBI的dbAppendTable函数支持通过fields参数指定要插入的列，无需修改原数据框添加多余列，直接只插入存在的longitude和latitude列：

# 确保列名与数据库表列名匹配（Oracle列名若为大写，这里需对应转换）
col_names <- c("LONGITUDE", "LATITUDE")
dbAppendTable(conn = con_oracle, name = "T_GEO_TABLE", value = r_table[, col_names], fields = col_names)

该方法直接跳过GEO列，不会触发类型不匹配问题，是最直接的解决方案。

方法2：手动构造INSERT语句并绑定参数 #

如果dbAppendTable因驱动限制无法使用，可以手动构造带参数的INSERT语句，配合dbBind批量插入，既避免SQL注入，也能实现部分列插入：

# 构造带参数的INSERT语句
insert_stmt <- dbSendQuery(con_oracle, "INSERT INTO T_GEO_TABLE (LONGITUDE, LATITUDE) VALUES (:lon, :lat)")
# 绑定数据框中的列作为参数
dbBind(insert_stmt, params = list(lon = r_table$longitude, lat = r_table$latitude))
# 执行并清理语句
dbFetch(insert_stmt)
dbClearResult(insert_stmt)

后续填充GEO字段 #

数据插入完成后，直接执行UPDATE语句生成SDO_GEOMETRY对象，例如基于经纬度生成点几何：

update_stmt <- "UPDATE T_GEO_TABLE 
                SET GEO = SDO_GEOMETRY(
                    2001, 
                    4326,  -- WGS84坐标系SRID
                    SDO_POINT_TYPE(LONGITUDE, LATITUDE, NULL), 
                    NULL, 
                    NULL
                )
                WHERE GEO IS NULL"
dbSendUpdate(con_oracle, update_stmt)

内容的提问来源于stack exchange，提问作者tomaz