1

我的 R 测试存在以下问题。我有测试函数需要更改数据库、计算结果、检查这些结果是否等于测试值并清理数据库。我正在尝试使用来自 MySQL 的事务以及来自 RMySQL 的 dbBegin(con) 和 dbRollback(con) 函数。

我试图运行以下代码:

.setUp <- function() {
dbBegin(con)
}

.tearDown <- function() {
dbRollback(con)
}

test.function1 <- function() {
....
}

test.function2 <- function() {
....
}

使用测试套件

test.suite <- defineTestSuite("example",
                              dirs = file.path("tests"),
                              testFileRegexp = '*.r')

test.result <- runTestSuite(test.suite)
printTextProtocol(test.result)

但是,当我运行多个功能时,我得到

Error in .local(conn, statement, ...) : 
  could not run statement: Duplicate entry '-1' for key 'PRIMARY'

这意味着我永远不会回滚我在数据库中写入的内容。

谁能指出上面的代码有什么问题和/或如何在 R + RMySQL 中编写测试来测试内部事务?

谢谢,弗拉基米尔

4

1 回答 1

0

这是测试改变 MySQL 数据库的 R 函数的正确方法。由于拼写错误,我收到了错误。

于 2015-06-08T13:42:39.600 回答