update plotting code and makefile
This commit is contained in:
25
simulations/RemembR/R/tests/test_RemembeR.R
Normal file
25
simulations/RemembR/R/tests/test_RemembeR.R
Normal file
@@ -0,0 +1,25 @@
|
||||
library(testthat)
|
||||
library(data.table)
|
||||
source("../RemembeR.R")
|
||||
test_that("single numbers",{
|
||||
remember(1,"one")
|
||||
expect_equal(r$one,1)
|
||||
}
|
||||
)
|
||||
|
||||
test_that("prefixes",{
|
||||
set.remember.prefix("prefix")
|
||||
remember(2,"two")
|
||||
expect_equal(r$prefix$two,2)
|
||||
expect_equal(r$one,1)
|
||||
}
|
||||
)
|
||||
|
||||
test.dt <- as.data.table(data("mtcars"))
|
||||
|
||||
test_that("data.tables",{
|
||||
set.remember.prefix("")
|
||||
remember(test.dt, 'test.dt')
|
||||
expect_equal(r$test.dt,test.dt)
|
||||
}
|
||||
)
|
||||
Reference in New Issue
Block a user