summaryrefslogtreecommitdiff
path: root/tests/testthat/test-matrix_metrics.R
blob: e9348df11f1d874eb9ee50181dd678b6f477547d (plain)
1
2
3
4
test_that("Check that error is zero if the input matrices are the same object", {
	results <- matrix_metrics(diag(10), diag(10))
	expect_equal(results$rmse[1], 0)
})