如何仅用dbplyr函数向数据库表添加不重复行？

可以通过dbplyr的反连接筛选+批量追加的组合实现，完全不用手写SQL，核心思路是先把待插入数据中已经存在于数据库表的行过滤掉，再插入剩余的新行。

步骤示例 #

假设你已经通过dbplyr建立了数据库连接con，数据库中有一张fruits表，结构包含fruit（唯一标识字段）和quantity字段：

1. 准备待插入数据与数据库表连接

library(dbplyr)
library(dplyr)

# 本地待插入数据（比如要添加的绿色苹果）
new_fruits <- tibble(fruit = "green apple", quantity = 10)

# 连接数据库中的fruits表
db_fruits <- tbl(con, "fruits")

2. 筛选数据库中不存在的行
   用anti_join()只保留待插入数据里在数据库表中没有匹配的行（这里以fruit作为唯一判断键）：

rows_to_insert <- new_fruits %>%
  anti_join(db_fruits, by = "fruit")

这个操作会被dbplyr自动转换成数据库对应的反连接SQL，在数据库端完成筛选，无需把全表数据拉到本地处理。

3. 插入无重复的行
   用rows_append()插入筛选后的行：

rows_append(db_fruits, rows_to_insert, copy = TRUE)

• copy = TRUE：因为new_fruits是本地数据框，需要先复制到数据库临时表再追加；如果待插入数据本身就是数据库端的tbl对象，可省略该参数。

关键注意点 #

• 必须明确唯一识别重复的键：如果需要多个字段组合判断重复，把by参数改成向量，比如by = c("fruit", "origin")
• 性能优化：给判断重复的字段（比如fruit）在数据库中建立索引，能大幅提升大表下的反连接筛选速度
• 对比原生函数：这个方法规避了rows_insert()遇重复报错、rows_append()直接插入重复行的问题，全程用dbplyr函数实现，无需手写SQL

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