所以我有一个使用以下方法创建的表:
dbGetQuery(conn, "CREATE TABLE Data (DataID integer primary key autoincrement,
DataTypeID integer, DataName varchar)")
在一些代码之后,我创建了一个名为“insertdata”的数据框,如下所示:
type name
1 1 Data1
2 1 Data2
3 1 Data3
4 1 Data4
5 1 Data5
我使用以下内容将其插入到我的表中:
dbWriteTable(conn, "Data", insertdata, append=TRUE)
稍后我创建另一个数据框以插入不同类型的数据,如下所示:
type name
1 2 OtherData1
2 2 OtherData2
3 2 OtherData3
4 2 OtherData4
5 2 OtherData5
但是当我使用与以前相同的 dbWriteTable 时,它告诉我
"Warning message:
In value[[3L]](cond) :
RS-DBI driver: (RS_SQLite_exec: could not execute: PRIMARY KEY must be unique)"
这是为什么?我的表设置为自动增加主键。我不明白非唯一字符来自哪里。是因为每个行的名称都相同吗?
最佳答案
是的,发生错误是因为每行的行名都相同。您已经创建了一个带有自增 ID 或 ROWID 的表。当新行插入 SQLite 表时,ROWID 可以指定为 INSERT 语句的一部分,也可以由数据库引擎自动分配。
当你使用
dbWriteTable(conn, "Data", insertdata, append=TRUE)
此处使用选项
row.names = TRUE
,因此行名用作增量 ID。由于您的 2 个 data.frame 具有相同的 rownames ,您会收到错误消息。通常的解决方法 是在插入语句 之前为新创建的行提供一个比表中最大 ROWID 大 1 的 ROWID。例如你可以这样做:
driver <- dbDriver("SQLite")
conn <- dbConnect(driver, dbname='DB_KEY')
## I read all the table to get rows number, you can optimize this with a clever select
index <- nrow(dbReadTable(conn,'Data'))
rownames(mydf) <- 1:nrow(mydf) +index
dbWriteTable(conn, "Data", mydf, append=TRUE)
dbDisconnect(conn)
关于r - 为什么 r/sqlite 需要主键?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/15353290/